Developer CD Series 1999 December: Reference Library

home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1999 …ember: Reference Library / Apple Developer Reference Library (December 1999) (Disk 1).iso / mac / Technical Documentation / Develop / develop Issue 22 / develop Issue 22 code / Paper Juggling.sea / Paper Juggling / Shell Files / ShellEvents.c < prev next >
MacBinary | 1995-04-18 | 20.3 KB | [TEXT/MMCC]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	Compact Compressed (Unix) `(archive/compact)`	ext	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Tue Apr 18 20:40:10 1995, modified Tue Apr 18 20:40:10 1995, creator 'MMCC', type ASCII, 19909 bytes "ShellEvents.c" , at 0x4e45 618 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[MMCC]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0d 53 68 65 6c 6c 45 | 76 65 6e 74 73 2e 63 00 |..ShellE|vents.c.|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 4d 43 | 43 01 00 00 00 00 00 00 |.TEXTMMC|C.......|
|00000050| 00 00 00 00 00 4d c5 00 | 00 02 6a ab ba 0c 6a ab |.....M..|..j...j.|
|00000060| ba 0c 6a 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |..j.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 6a 7d 00 00 |........|....j}..|
|00000080| 2f 2f 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |//------|--------|
|00000090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000c0| 2d 2d 2d 2d 2d 2d 2d 0d | 2f 2f 2d 2d 2d 2d 2d 2d |-------.|//------|
|000000d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000100| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00000110| 2f 2f 0d 2f 2f 09 48 6f | 72 72 69 62 6c 65 20 52 |//.//.Ho|rrible R|
|00000120| 69 63 6b 65 74 79 20 53 | 68 65 6c 6c 2c 20 62 79 |ickety S|hell, by|
|00000130| 20 44 61 76 65 20 4a 6f | 68 6e 73 6f 6e 0d 2f 2f | Dave Jo|hnson.//|
|00000140| 0d 2f 2f 09 a9 20 43 6f | 70 79 72 69 67 68 74 20 |.//.. Co|pyright |
|00000150| 31 39 38 35 20 2d 20 31 | 39 39 35 20 41 6e 79 6f |1985 - 1|995 Anyo|
|00000160| 6e 65 20 57 68 6f 20 57 | 61 6e 74 73 20 49 74 2c |ne Who W|ants It,|
|00000170| 0d 2f 2f 09 41 6c 6c 20 | 52 69 67 68 74 73 20 45 |.//.All |Rights E|
|00000180| 6e 65 72 67 65 74 69 63 | 61 6c 6c 79 20 48 75 72 |nergetic|ally Hur|
|00000190| 6c 65 64 20 61 73 20 66 | 61 72 20 61 77 61 79 20 |led as f|ar away |
|000001a0| 66 72 6f 6d 20 6d 65 20 | 61 73 20 70 6f 73 73 69 |from me |as possi|
|000001b0| 62 6c 65 2e 0d 2f 2f 09 | 55 73 65 20 61 74 20 79 |ble..//.|Use at y|
|000001c0| 6f 75 72 20 6f 77 6e 20 | 28 63 6f 6e 73 69 64 65 |our own |(conside|
|000001d0| 72 61 62 6c 65 29 20 72 | 69 73 6b 2e 0d 0d 0d 23 |rable) r|isk....#|
|000001e0| 69 6e 63 6c 75 64 65 09 | 22 50 61 70 65 72 4a 75 |include.|"PaperJu|
|000001f0| 67 67 6c 69 6e 67 2e 68 | 22 0d 0d 65 78 74 65 72 |ggling.h|"..exter|
|00000200| 6e 20 42 6f 6f 6c 65 61 | 6e 09 09 09 67 44 6f 6e |n Boolea|n...gDon|
|00000210| 65 46 6c 61 67 3b 0d 65 | 78 74 65 72 6e 20 52 65 |eFlag;.e|xtern Re|
|00000220| 63 74 09 09 09 09 67 44 | 65 73 6b 52 65 63 74 3b |ct....gD|eskRect;|
|00000230| 0d 65 78 74 65 72 6e 20 | 4d 65 6e 75 48 61 6e 64 |.extern |MenuHand|
|00000240| 6c 65 09 09 67 53 68 65 | 6c 6c 4d 65 6e 75 48 61 |le..gShe|llMenuHa|
|00000250| 6e 64 6c 65 73 5b 5d 3b | 0d 65 78 74 65 72 6e 20 |ndles[];|.extern |
|00000260| 75 6e 73 69 67 6e 65 64 | 20 6c 6f 6e 67 09 67 43 |unsigned| long.gC|
|00000270| 6c 69 63 6b 54 69 6d 65 | 2c 20 67 53 6c 65 65 70 |lickTime|, gSleep|
|00000280| 54 69 6d 65 3b 0d 65 78 | 74 65 72 6e 20 73 68 6f |Time;.ex|tern sho|
|00000290| 72 74 09 09 09 67 44 6f | 63 54 69 74 6c 65 48 65 |rt...gDo|cTitleHe|
|000002a0| 69 67 68 74 2c 20 67 44 | 6f 63 46 72 61 6d 65 57 |ight, gD|ocFrameW|
|000002b0| 69 64 74 68 3b 20 09 2f | 2f 20 57 69 6e 64 6f 77 |idth; ./|/ Window|
|000002c0| 20 53 74 61 74 73 2c 20 | 66 6f 72 20 75 73 65 20 | Stats, |for use |
|000002d0| 69 6e 20 70 6f 73 69 74 | 69 6f 6e 69 6e 67 0d 65 |in posit|ioning.e|
|000002e0| 78 74 65 72 6e 20 43 6f | 6e 74 72 6f 6c 41 63 74 |xtern Co|ntrolAct|
|000002f0| 69 6f 6e 55 50 50 09 67 | 53 63 72 6f 6c 6c 41 63 |ionUPP.g|ScrollAc|
|00000300| 74 69 6f 6e 55 50 50 3b | 0d 0d 2f 2a 2d 2d 2d 2d |tionUPP;|../*----|
|00000310| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000320| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000330| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000340| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000350| 2d 2d 2d 2d 2d 0d 44 6f | 45 76 65 6e 74 28 29 09 |-----.Do|Event().|
|00000360| 09 09 53 74 61 6e 64 61 | 72 64 20 45 76 65 6e 74 |..Standa|rd Event|
|00000370| 20 48 61 6e 64 6c 65 72 | 2e 2e 2e 0d 2d 2d 2d 2d | Handler|....----|
|00000380| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000390| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003c0| 2d 2d 2d 2d 2d 2a 2f 0d | 0d 76 6f 69 64 20 44 6f |-----*/.|.void Do|
|000003d0| 45 76 65 6e 74 28 45 76 | 65 6e 74 52 65 63 6f 72 |Event(Ev|entRecor|
|000003e0| 64 20 2a 45 76 65 6e 74 | 29 0d 7b 0d 09 47 72 61 |d *Event|).{..Gra|
|000003f0| 66 50 74 72 09 09 6f 6c | 64 70 6f 72 74 3b 0d 09 |fPtr..ol|dport;..|
|00000400| 0d 09 2f 2f 20 41 6c 6c | 6f 77 20 61 70 70 20 74 |..// All|ow app t|
|00000410| 6f 20 68 61 6e 64 6c 65 | 20 72 61 77 20 65 76 65 |o handle| raw eve|
|00000420| 6e 74 0d 09 69 66 28 41 | 70 70 44 6f 45 76 65 6e |nt..if(A|ppDoEven|
|00000430| 74 28 45 76 65 6e 74 29 | 20 3d 3d 20 74 72 75 65 |t(Event)| == true|
|00000440| 29 0d 09 09 72 65 74 75 | 72 6e 3b 0d 09 0d 09 2f |)...retu|rn;..../|
|00000450| 2f 20 44 6f 20 73 74 61 | 6e 64 61 72 64 20 65 76 |/ Do sta|ndard ev|
|00000460| 65 6e 74 20 70 72 6f 63 | 65 73 73 69 6e 67 09 0d |ent proc|essing..|
|00000470| 09 73 77 69 74 63 68 28 | 45 76 65 6e 74 2d 3e 77 |.switch(|Event->w|
|00000480| 68 61 74 29 0d 09 7b 0d | 09 09 63 61 73 65 20 61 |hat)..{.|..case a|
|00000490| 63 74 69 76 61 74 65 45 | 76 74 3a 0d 09 09 09 44 |ctivateE|vt:....D|
|000004a0| 6f 41 63 74 69 76 61 74 | 65 28 28 57 69 6e 64 6f |oActivat|e((Windo|
|000004b0| 77 50 74 72 29 45 76 65 | 6e 74 2d 3e 6d 65 73 73 |wPtr)Eve|nt->mess|
|000004c0| 61 67 65 2c 20 45 76 65 | 6e 74 2d 3e 6d 6f 64 69 |age, Eve|nt->modi|
|000004d0| 66 69 65 72 73 20 26 20 | 61 63 74 69 76 65 46 6c |fiers & |activeFl|
|000004e0| 61 67 29 3b 0d 09 09 09 | 62 72 65 61 6b 3b 0d 09 |ag);....|break;..|
|000004f0| 09 09 09 0d 09 09 63 61 | 73 65 20 75 70 64 61 74 |......ca|se updat|
|00000500| 65 45 76 74 3a 0d 09 09 | 09 7b 0d 09 09 09 09 57 |eEvt:...|.{.....W|
|00000510| 69 6e 64 6f 77 50 74 72 | 09 77 69 6e 64 20 3d 20 |indowPtr|.wind = |
|00000520| 28 57 69 6e 64 6f 77 50 | 74 72 29 45 76 65 6e 74 |(WindowP|tr)Event|
|00000530| 2d 3e 6d 65 73 73 61 67 | 65 3b 0d 09 09 09 09 0d |->messag|e;......|
|00000540| 09 09 09 09 69 66 28 49 | 73 41 70 70 57 69 6e 64 |....if(I|sAppWind|
|00000550| 6f 77 28 77 69 6e 64 29 | 29 0d 09 09 09 09 7b 0d |ow(wind)|).....{.|
|00000560| 09 09 09 09 09 47 65 74 | 50 6f 72 74 28 26 6f 6c |.....Get|Port(&ol|
|00000570| 64 70 6f 72 74 29 3b 0d | 09 09 09 09 09 53 65 74 |dport);.|.....Set|
|00000580| 50 6f 72 74 28 77 69 6e | 64 29 3b 0d 09 09 09 09 |Port(win|d);.....|
|00000590| 09 43 6c 69 70 52 65 63 | 74 28 26 77 69 6e 64 2d |.ClipRec|t(&wind-|
|000005a0| 3e 70 6f 72 74 52 65 63 | 74 29 3b 0d 09 09 09 09 |>portRec|t);.....|
|000005b0| 09 42 65 67 69 6e 55 70 | 64 61 74 65 28 77 69 6e |.BeginUp|date(win|
|000005c0| 64 29 3b 0d 09 09 09 09 | 09 0d 09 09 09 09 09 2f |d);.....|......./|
|000005d0| 2a 20 44 72 61 77 20 74 | 68 65 20 67 72 6f 77 62 |* Draw t|he growb|
|000005e0| 6f 78 20 61 6e 64 20 63 | 6f 6e 74 72 6f 6c 73 20 |ox and c|ontrols |
|000005f0| 2a 2f 09 0d 09 09 09 09 | 09 55 70 64 61 74 65 43 |*/......|.UpdateC|
|00000600| 6f 6e 74 72 6f 6c 73 28 | 77 69 6e 64 2c 20 77 69 |ontrols(|wind, wi|
|00000610| 6e 64 2d 3e 76 69 73 52 | 67 6e 29 3b 0d 09 09 09 |nd->visR|gn);....|
|00000620| 09 09 44 72 61 77 47 72 | 6f 77 49 63 6f 6e 28 77 |..DrawGr|owIcon(w|
|00000630| 69 6e 64 29 3b 0d 09 09 | 09 09 09 0d 09 09 09 09 |ind);...|........|
|00000640| 09 2f 2f 20 43 61 6c 6c | 20 74 68 65 20 61 70 70 |.// Call| the app|
|00000650| 20 74 6f 20 64 72 61 77 | 20 63 6f 6e 74 65 6e 74 | to draw| content|
|00000660| 0d 09 09 09 09 09 41 70 | 70 55 70 64 61 74 65 28 |......Ap|pUpdate(|
|00000670| 77 69 6e 64 29 3b 0d 0d | 09 09 09 09 09 45 6e 64 |wind);..|.....End|
|00000680| 55 70 64 61 74 65 28 77 | 69 6e 64 29 3b 0d 09 09 |Update(w|ind);...|
|00000690| 09 09 09 53 65 74 50 6f | 72 74 28 6f 6c 64 70 6f |...SetPo|rt(oldpo|
|000006a0| 72 74 29 3b 0d 09 09 09 | 09 7d 0d 09 09 09 7d 0d |rt);....|.}....}.|
|000006b0| 09 09 09 62 72 65 61 6b | 3b 0d 0d 09 09 63 61 73 |...break|;....cas|
|000006c0| 65 20 6d 6f 75 73 65 44 | 6f 77 6e 3a 0d 09 09 09 |e mouseD|own:....|
|000006d0| 44 6f 4d 6f 75 73 65 28 | 45 76 65 6e 74 29 3b 0d |DoMouse(|Event);.|
|000006e0| 09 09 09 67 43 6c 69 63 | 6b 54 69 6d 65 20 3d 20 |...gClic|kTime = |
|000006f0| 45 76 65 6e 74 2d 3e 77 | 68 65 6e 3b 0d 09 09 09 |Event->w|hen;....|
|00000700| 62 72 65 61 6b 3b 0d 09 | 09 09 0d 09 09 63 61 73 |break;..|.....cas|
|00000710| 65 20 6b 65 79 44 6f 77 | 6e 3a 0d 09 09 63 61 73 |e keyDow|n:...cas|
|00000720| 65 20 61 75 74 6f 4b 65 | 79 3a 0d 09 09 09 44 6f |e autoKe|y:....Do|
|00000730| 4b 65 79 28 45 76 65 6e | 74 29 3b 0d 09 09 09 62 |Key(Even|t);....b|
|00000740| 72 65 61 6b 3b 0d 09 09 | 0d 09 09 63 61 73 65 20 |reak;...|...case |
|00000750| 6f 73 45 76 74 3a 0d 09 | 09 09 44 6f 4f 53 28 45 |osEvt:..|..DoOS(E|
|00000760| 76 65 6e 74 29 3b 0d 09 | 09 09 62 72 65 61 6b 3b |vent);..|..break;|
|00000770| 0d 09 09 0d 09 09 63 61 | 73 65 20 6b 48 69 67 68 |......ca|se kHigh|
|00000780| 4c 65 76 65 6c 45 76 65 | 6e 74 3a 0d 09 09 09 44 |LevelEve|nt:....D|
|00000790| 6f 48 69 67 68 4c 65 76 | 65 6c 28 45 76 65 6e 74 |oHighLev|el(Event|
|000007a0| 29 3b 0d 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 0d |);....br|eak;....|
|000007b0| 09 09 63 61 73 65 20 6e | 75 6c 6c 45 76 65 6e 74 |..case n|ullEvent|
|000007c0| 3a 0d 09 09 09 41 70 70 | 49 64 6c 65 28 45 76 65 |:....App|Idle(Eve|
|000007d0| 6e 74 29 3b 0d 09 09 09 | 62 72 65 61 6b 3b 0d 09 |nt);....|break;..|
|000007e0| 7d 0d 7d 0d 0d 76 6f 69 | 64 20 44 6f 41 63 74 69 |}.}..voi|d DoActi|
|000007f0| 76 61 74 65 28 57 69 6e | 64 6f 77 50 74 72 20 77 |vate(Win|dowPtr w|
|00000800| 69 6e 64 2c 20 42 6f 6f | 6c 65 61 6e 20 61 63 74 |ind, Boo|lean act|
|00000810| 69 76 61 74 65 29 0d 7b | 0d 09 44 6f 63 48 61 6e |ivate).{|..DocHan|
|00000820| 64 6c 65 09 09 64 6f 63 | 3b 0d 09 0d 09 69 66 28 |dle..doc|;....if(|
|00000830| 21 49 73 41 70 70 57 69 | 6e 64 6f 77 28 77 69 6e |!IsAppWi|ndow(win|
|00000840| 64 29 20 7c 7c 20 28 64 | 6f 63 20 3d 20 47 65 74 |d) || (d|oc = Get|
|00000850| 57 69 6e 64 6f 77 44 6f | 63 28 77 69 6e 64 29 29 |WindowDo|c(wind))|
|00000860| 20 3d 3d 20 6e 69 6c 29 | 0d 09 09 72 65 74 75 72 | == nil)|...retur|
|00000870| 6e 3b 0d 09 0d 09 53 65 | 74 50 6f 72 74 28 77 69 |n;....Se|tPort(wi|
|00000880| 6e 64 29 3b 0d 09 69 66 | 28 61 63 74 69 76 61 74 |nd);..if|(activat|
|00000890| 65 29 20 09 2f 2f 20 61 | 6e 20 61 63 74 69 76 61 |e) .// a|n activa|
|000008a0| 74 65 20 65 76 65 6e 74 | 0d 09 7b 0d 09 09 0d 09 |te event|..{.....|
|000008b0| 09 2f 2f 20 20 74 68 65 | 20 67 72 6f 77 62 6f 78 |.//  the| growbox|
|000008c0| 20 61 6e 64 20 63 6f 6e | 74 72 6f 6c 73 20 6d 75 | and con|trols mu|
|000008d0| 73 74 20 62 65 20 72 65 | 64 72 61 77 6e 20 6f 6e |st be re|drawn on|
|000008e0| 20 61 63 74 69 76 61 74 | 69 6f 6e 2e 20 0d 09 09 | activat|ion. ...|
|000008f0| 44 72 61 77 47 72 6f 77 | 49 63 6f 6e 28 77 69 6e |DrawGrow|Icon(win|
|00000900| 64 29 3b 0d 09 09 53 68 | 6f 77 43 6f 6e 74 72 6f |d);...Sh|owContro|
|00000910| 6c 28 28 2a 64 6f 63 29 | 2d 3e 68 53 63 72 6f 6c |l((*doc)|->hScrol|
|00000920| 6c 29 3b 0d 09 09 53 68 | 6f 77 43 6f 6e 74 72 6f |l);...Sh|owContro|
|00000930| 6c 28 28 2a 64 6f 63 29 | 2d 3e 76 53 63 72 6f 6c |l((*doc)|->vScrol|
|00000940| 6c 29 3b 0d 09 7d 0d 09 | 65 6c 73 65 09 09 09 2f |l);..}..|else.../|
|00000950| 2f 20 61 20 64 65 61 63 | 74 69 76 61 74 65 20 65 |/ a deac|tivate e|
|00000960| 76 65 6e 74 0d 09 7b 0d | 09 09 2f 2f 20 20 74 68 |vent..{.|..//  th|
|00000970| 65 20 67 72 6f 77 62 6f | 78 20 61 6e 64 20 63 6f |e growbo|x and co|
|00000980| 6e 74 72 6f 6c 73 20 6d | 75 73 74 20 62 65 20 72 |ntrols m|ust be r|
|00000990| 65 64 72 61 77 6e 20 6f | 6e 20 64 65 2d 61 63 74 |edrawn o|n de-act|
|000009a0| 69 76 61 74 69 6f 6e 2c | 20 74 6f 6f 2e 20 0d 09 |ivation,| too. ..|
|000009b0| 09 48 69 64 65 43 6f 6e | 74 72 6f 6c 28 28 2a 64 |.HideCon|trol((*d|
|000009c0| 6f 63 29 2d 3e 68 53 63 | 72 6f 6c 6c 29 3b 0d 09 |oc)->hSc|roll);..|
|000009d0| 09 48 69 64 65 43 6f 6e | 74 72 6f 6c 28 28 2a 64 |.HideCon|trol((*d|
|000009e0| 6f 63 29 2d 3e 76 53 63 | 72 6f 6c 6c 29 3b 0d 09 |oc)->vSc|roll);..|
|000009f0| 09 44 72 61 77 47 72 6f | 77 49 63 6f 6e 28 77 69 |.DrawGro|wIcon(wi|
|00000a00| 6e 64 29 3b 0d 09 7d 0d | 09 0d 09 2f 2f 20 4e 6f |nd);..}.|...// No|
|00000a10| 74 69 66 79 20 61 70 70 | 0d 09 41 70 70 41 63 74 |tify app|..AppAct|
|00000a20| 69 76 61 74 65 28 77 69 | 6e 64 2c 20 61 63 74 69 |ivate(wi|nd, acti|
|00000a30| 76 61 74 65 29 3b 0d 7d | 0d 0d 2f 2a 2d 2d 2d 2d |vate);.}|../*----|
|00000a40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000a50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000a60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000a70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000a80| 2d 2d 2d 2d 0d 44 6f 4d | 6f 75 73 65 28 29 09 09 |----.DoM|ouse()..|
|00000a90| 09 48 61 6e 64 6c 65 73 | 20 6d 6f 75 73 65 64 6f |.Handles| mousedo|
|00000aa0| 77 6e 20 65 76 65 6e 74 | 73 2e 2e 2e 0d 2d 2d 2d |wn event|s....---|
|00000ab0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ac0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ad0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ae0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000af0| 2d 2d 2d 2d 2d 2d 2a 2f | 0d 0d 76 6f 69 64 20 44 |------*/|..void D|
|00000b00| 6f 4d 6f 75 73 65 28 45 | 76 65 6e 74 52 65 63 6f |oMouse(E|ventReco|
|00000b10| 72 64 20 2a 65 76 65 6e | 74 70 74 72 29 0d 7b 09 |rd *even|tptr).{.|
|00000b20| 0d 09 57 69 6e 64 6f 77 | 50 74 72 09 09 77 68 69 |..Window|Ptr..whi|
|00000b30| 63 68 57 69 6e 64 70 74 | 72 3b 0d 09 50 6f 69 6e |chWindpt|r;..Poin|
|00000b40| 74 09 09 09 74 68 65 50 | 74 3b 0d 09 6c 6f 6e 67 |t...theP|t;..long|
|00000b50| 09 09 09 6d 73 74 75 66 | 66 3b 0d 09 73 68 6f 72 |...mstuf|f;..shor|
|00000b60| 74 09 09 09 70 61 72 74 | 3b 0d 09 42 6f 6f 6c 65 |t...part|;..Boole|
|00000b70| 61 6e 09 09 09 64 6f 75 | 62 6c 65 43 6c 69 63 6b |an...dou|bleClick|
|00000b80| 20 3d 20 66 61 6c 73 65 | 3b 0d 0d 09 0d 09 69 66 | = false|;.....if|
|00000b90| 28 28 65 76 65 6e 74 70 | 74 72 2d 3e 77 68 65 6e |((eventp|tr->when|
|00000ba0| 20 2d 20 67 43 6c 69 63 | 6b 54 69 6d 65 29 20 3c | - gClic|kTime) <|
|00000bb0| 3d 20 47 65 74 44 62 6c | 54 69 6d 65 28 29 29 0d |= GetDbl|Time()).|
|00000bc0| 09 7b 0d 09 09 64 6f 75 | 62 6c 65 43 6c 69 63 6b |.{...dou|bleClick|
|00000bd0| 20 3d 20 74 72 75 65 3b | 0d 09 7d 0d 09 74 68 65 | = true;|..}..the|
|00000be0| 50 74 20 3d 20 65 76 65 | 6e 74 70 74 72 2d 3e 77 |Pt = eve|ntptr->w|
|00000bf0| 68 65 72 65 3b 0d 09 70 | 61 72 74 20 3d 20 46 69 |here;..p|art = Fi|
|00000c00| 6e 64 57 69 6e 64 6f 77 | 28 74 68 65 50 74 2c 20 |ndWindow|(thePt, |
|00000c10| 26 77 68 69 63 68 57 69 | 6e 64 70 74 72 29 3b 0d |&whichWi|ndptr);.|
|00000c20| 09 73 77 69 74 63 68 28 | 70 61 72 74 29 0d 09 7b |.switch(|part)..{|
|00000c30| 0d 09 09 63 61 73 65 20 | 69 6e 44 65 73 6b 3a 0d |...case |inDesk:.|
|00000c40| 09 09 09 62 72 65 61 6b | 3b 0d 09 09 09 0d 09 09 |...break|;.......|
|00000c50| 63 61 73 65 20 69 6e 4d | 65 6e 75 42 61 72 3a 0d |case inM|enuBar:.|
|00000c60| 09 09 09 44 6f 41 64 6a | 75 73 74 4d 65 6e 75 73 |...DoAdj|ustMenus|
|00000c70| 28 29 3b 0d 09 09 09 6d | 73 74 75 66 66 20 3d 20 |();....m|stuff = |
|00000c80| 4d 65 6e 75 53 65 6c 65 | 63 74 28 74 68 65 50 74 |MenuSele|ct(thePt|
|00000c90| 29 3b 0d 09 09 09 44 6f | 4d 65 6e 75 73 28 6d 73 |);....Do|Menus(ms|
|00000ca0| 74 75 66 66 29 3b 0d 09 | 09 09 62 72 65 61 6b 3b |tuff);..|..break;|
|00000cb0| 0d 09 09 09 0d 09 09 63 | 61 73 65 20 69 6e 53 79 |.......c|ase inSy|
|00000cc0| 73 57 69 6e 64 6f 77 3a | 0d 09 09 09 53 79 73 74 |sWindow:|....Syst|
|00000cd0| 65 6d 43 6c 69 63 6b 28 | 65 76 65 6e 74 70 74 72 |emClick(|eventptr|
|00000ce0| 2c 20 77 68 69 63 68 57 | 69 6e 64 70 74 72 29 3b |, whichW|indptr);|
|00000cf0| 0d 09 09 09 62 72 65 61 | 6b 3b 0d 09 09 0d 09 09 |....brea|k;......|
|00000d00| 63 61 73 65 20 69 6e 43 | 6f 6e 74 65 6e 74 3a 0d |case inC|ontent:.|
|00000d10| 09 09 09 69 66 28 77 68 | 69 63 68 57 69 6e 64 70 |...if(wh|ichWindp|
|00000d20| 74 72 20 21 3d 20 46 72 | 6f 6e 74 57 69 6e 64 6f |tr != Fr|ontWindo|
|00000d30| 77 28 29 29 0d 09 09 09 | 09 53 65 6c 65 63 74 57 |w())....|.SelectW|
|00000d40| 69 6e 64 6f 77 28 77 68 | 69 63 68 57 69 6e 64 70 |indow(wh|ichWindp|
|00000d50| 74 72 29 3b 0d 09 09 09 | 65 6c 73 65 0d 09 09 09 |tr);....|else....|
|00000d60| 7b 0d 09 09 09 09 53 65 | 74 50 6f 72 74 28 77 68 |{.....Se|tPort(wh|
|00000d70| 69 63 68 57 69 6e 64 70 | 74 72 29 3b 0d 09 09 09 |ichWindp|tr);....|
|00000d80| 09 47 6c 6f 62 61 6c 54 | 6f 4c 6f 63 61 6c 28 26 |.GlobalT|oLocal(&|
|00000d90| 74 68 65 50 74 29 3b 0d | 09 09 09 09 44 6f 43 6f |thePt);.|....DoCo|
|00000da0| 6e 74 65 6e 74 43 6c 69 | 63 6b 28 74 68 65 50 74 |ntentCli|ck(thePt|
|00000db0| 2c 20 77 68 69 63 68 57 | 69 6e 64 70 74 72 2c 20 |, whichW|indptr, |
|00000dc0| 64 6f 75 62 6c 65 43 6c | 69 63 6b 2c 20 65 76 65 |doubleCl|ick, eve|
|00000dd0| 6e 74 70 74 72 29 3b 0d | 09 09 09 7d 0d 09 09 09 |ntptr);.|...}....|
|00000de0| 62 72 65 61 6b 3b 0d 09 | 09 09 0d 09 09 63 61 73 |break;..|.....cas|
|00000df0| 65 20 69 6e 44 72 61 67 | 3a 0d 09 09 09 44 72 61 |e inDrag|:....Dra|
|00000e00| 67 57 69 6e 64 6f 77 28 | 77 68 69 63 68 57 69 6e |gWindow(|whichWin|
|00000e10| 64 70 74 72 2c 20 74 68 | 65 50 74 2c 20 26 67 44 |dptr, th|ePt, &gD|
|00000e20| 65 73 6b 52 65 63 74 29 | 3b 0d 09 09 09 62 72 65 |eskRect)|;....bre|
|00000e30| 61 6b 3b 0d 0d 09 09 63 | 61 73 65 20 69 6e 47 72 |ak;....c|ase inGr|
|00000e40| 6f 77 3a 0d 09 09 09 44 | 6f 47 72 6f 77 57 69 6e |ow:....D|oGrowWin|
|00000e50| 64 6f 77 28 77 68 69 63 | 68 57 69 6e 64 70 74 72 |dow(whic|hWindptr|
|00000e60| 2c 20 74 68 65 50 74 29 | 3b 0d 09 09 09 62 72 65 |, thePt)|;....bre|
|00000e70| 61 6b 3b 0d 09 09 09 0d | 09 09 63 61 73 65 20 69 |ak;.....|..case i|
|00000e80| 6e 47 6f 41 77 61 79 3a | 0d 09 09 09 69 66 28 54 |nGoAway:|....if(T|
|00000e90| 72 61 63 6b 47 6f 41 77 | 61 79 28 77 68 69 63 68 |rackGoAw|ay(which|
|00000ea0| 57 69 6e 64 70 74 72 2c | 20 74 68 65 50 74 29 29 |Windptr,| thePt))|
|00000eb0| 0d 09 09 09 7b 0d 09 09 | 09 09 44 6f 43 6c 6f 73 |....{...|..DoClos|
|00000ec0| 65 28 77 68 69 63 68 57 | 69 6e 64 70 74 72 29 3b |e(whichW|indptr);|
|00000ed0| 0d 09 09 09 09 44 6f 41 | 64 6a 75 73 74 4d 65 6e |.....DoA|djustMen|
|00000ee0| 75 73 28 29 3b 0d 09 09 | 09 7d 0d 09 09 09 62 72 |us();...|.}....br|
|00000ef0| 65 61 6b 3b 0d 09 09 09 | 0d 09 09 63 61 73 65 20 |eak;....|...case |
|00000f00| 69 6e 5a 6f 6f 6d 49 6e | 3a 0d 09 09 63 61 73 65 |inZoomIn|:...case|
|00000f10| 20 69 6e 5a 6f 6f 6d 4f | 75 74 3a 0d 09 09 09 69 | inZoomO|ut:....i|
|00000f20| 66 28 54 72 61 63 6b 42 | 6f 78 28 77 68 69 63 68 |f(TrackB|ox(which|
|00000f30| 57 69 6e 64 70 74 72 2c | 20 74 68 65 50 74 2c 20 |Windptr,| thePt, |
|00000f40| 70 61 72 74 29 29 0d 09 | 09 09 09 44 6f 5a 6f 6f |part))..|...DoZoo|
|00000f50| 6d 57 69 6e 64 6f 77 28 | 77 68 69 63 68 57 69 6e |mWindow(|whichWin|
|00000f60| 64 70 74 72 2c 20 70 61 | 72 74 29 3b 0d 09 09 09 |dptr, pa|rt);....|
|00000f70| 62 72 65 61 6b 3b 0d 09 | 7d 0d 7d 0d 0d 76 6f 69 |break;..|}.}..voi|
|00000f80| 64 20 44 6f 41 64 6a 75 | 73 74 4d 65 6e 75 73 28 |d DoAdju|stMenus(|
|00000f90| 76 6f 69 64 29 0d 7b 0d | 09 4d 65 6e 75 48 61 6e |void).{.|.MenuHan|
|00000fa0| 64 6c 65 09 6d 68 6e 64 | 6c 3b 0d 09 6c 6f 6e 67 |dle.mhnd|l;..long|
|00000fb0| 09 09 70 69 63 74 53 69 | 7a 65 2c 20 69 67 6e 6f |..pictSi|ze, igno|
|00000fc0| 72 65 64 3b 0d 09 42 6f | 6f 6c 65 61 6e 09 09 77 |red;..Bo|olean..w|
|00000fd0| 69 6e 64 6f 77 73 55 70 | 3b 0d 09 09 09 0d 09 2f |indowsUp|;....../|
|00000fe0| 2a 20 4f 4b 2c 20 66 69 | 72 73 74 20 74 68 65 20 |* OK, fi|rst the |
|00000ff0| 66 69 6c 65 20 6d 65 6e | 75 2e 20 49 66 20 74 68 |file men|u. If th|
|00001000| 65 20 77 69 6e 64 6f 77 | 73 20 61 72 65 20 75 70 |e window|s are up|
|00001010| 2c 20 74 68 65 6e 20 65 | 6e 61 62 6c 65 20 43 6c |, then e|nable Cl|
|00001020| 6f 73 65 2c 20 53 61 76 | 65 20 28 69 66 0d 09 09 |ose, Sav|e (if...|
|00001030| 74 68 65 20 77 69 6e 64 | 6f 77 20 6e 65 65 64 73 |the wind|ow needs|
|00001040| 20 73 61 76 69 6e 67 29 | 2c 20 61 6e 64 20 53 61 | saving)|, and Sa|
|00001050| 76 65 20 41 73 2e 20 41 | 6c 73 6f 20 65 6e 61 62 |ve As. A|lso enab|
|00001060| 6c 65 20 50 61 67 65 20 | 53 65 74 75 70 2c 20 50 |le Page |Setup, P|
|00001070| 72 69 6e 74 2c 20 61 6e | 64 20 0d 09 09 50 72 69 |rint, an|d ...Pri|
|00001080| 6e 74 20 4f 6e 65 2e 20 | 49 66 20 74 68 65 72 65 |nt One. |If there|
|00001090| 20 61 72 65 20 6e 6f 20 | 77 69 6e 64 6f 77 73 20 | are no |windows |
|000010a0| 6f 70 65 6e 2c 20 64 69 | 73 61 62 6c 65 20 73 61 |open, di|sable sa|
|000010b0| 6d 65 2e 20 4e 65 77 2c | 20 0d 09 09 61 6e 64 20 |me. New,| ...and |
|000010c0| 51 75 69 74 20 61 72 65 | 20 61 6c 77 61 79 73 20 |Quit are| always |
|000010d0| 65 6e 61 62 6c 65 64 2e | 20 2a 2f 0d 09 0d 09 77 |enabled.| */....w|
|000010e0| 69 6e 64 6f 77 73 55 70 | 20 3d 20 28 46 72 6f 6e |indowsUp| = (Fron|
|000010f0| 74 57 69 6e 64 6f 77 28 | 29 20 21 3d 20 6e 69 6c |tWindow(|) != nil|
|00001100| 20 26 26 20 49 73 41 70 | 70 57 69 6e 64 6f 77 28 | && IsAp|pWindow(|
|00001110| 46 72 6f 6e 74 57 69 6e | 64 6f 77 28 29 29 29 3b |FrontWin|dow()));|
|00001120| 0d 09 6d 68 6e 64 6c 20 | 3d 20 67 53 68 65 6c 6c |..mhndl |= gShell|
|00001130| 4d 65 6e 75 48 61 6e 64 | 6c 65 73 5b 6b 46 69 6c |MenuHand|les[kFil|
|00001140| 65 4d 65 6e 75 5d 3b 0d | 0d 09 69 66 28 77 69 6e |eMenu];.|..if(win|
|00001150| 64 6f 77 73 55 70 29 0d | 09 7b 0d 09 09 44 6f 63 |dowsUp).|.{...Doc|
|00001160| 48 61 6e 64 6c 65 20 64 | 6f 63 3b 0d 09 09 0d 09 |Handle d|oc;.....|
|00001170| 09 45 6e 61 62 6c 65 49 | 74 65 6d 28 6d 68 6e 64 |.EnableI|tem(mhnd|
|00001180| 6c 2c 20 69 43 6c 6f 73 | 65 29 3b 0d 09 09 64 6f |l, iClos|e);...do|
|00001190| 63 20 3d 20 47 65 74 57 | 69 6e 64 6f 77 44 6f 63 |c = GetW|indowDoc|
|000011a0| 28 46 72 6f 6e 74 57 69 | 6e 64 6f 77 28 29 29 3b |(FrontWi|ndow());|
|000011b0| 0d 09 09 69 66 28 28 2a | 64 6f 63 29 2d 3e 64 69 |...if((*|doc)->di|
|000011c0| 72 74 79 29 0d 09 09 09 | 45 6e 61 62 6c 65 49 74 |rty)....|EnableIt|
|000011d0| 65 6d 28 6d 68 6e 64 6c | 2c 20 69 53 61 76 65 29 |em(mhndl|, iSave)|
|000011e0| 3b 0d 09 09 65 6c 73 65 | 0d 09 09 09 44 69 73 61 |;...else|....Disa|
|000011f0| 62 6c 65 49 74 65 6d 28 | 6d 68 6e 64 6c 2c 20 69 |bleItem(|mhndl, i|
|00001200| 53 61 76 65 29 3b 0d 09 | 09 45 6e 61 62 6c 65 49 |Save);..|.EnableI|
|00001210| 74 65 6d 28 6d 68 6e 64 | 6c 2c 20 69 53 61 76 65 |tem(mhnd|l, iSave|
|00001220| 41 73 29 3b 0d 09 09 45 | 6e 61 62 6c 65 49 74 65 |As);...E|nableIte|
|00001230| 6d 28 6d 68 6e 64 6c 2c | 20 69 50 61 67 65 53 65 |m(mhndl,| iPageSe|
|00001240| 74 75 70 29 3b 0d 09 09 | 45 6e 61 62 6c 65 49 74 |tup);...|EnableIt|
|00001250| 65 6d 28 6d 68 6e 64 6c | 2c 20 69 50 72 69 6e 74 |em(mhndl|, iPrint|
|00001260| 29 3b 0d 09 09 45 6e 61 | 62 6c 65 49 74 65 6d 28 |);...Ena|bleItem(|
|00001270| 6d 68 6e 64 6c 2c 20 69 | 50 72 69 6e 74 4f 6e 65 |mhndl, i|PrintOne|
|00001280| 29 3b 0d 09 7d 0d 09 65 | 6c 73 65 09 09 2f 2f 20 |);..}..e|lse..// |
|00001290| 20 54 68 65 20 77 69 6e | 64 6f 77 73 20 61 72 65 | The win|dows are|
|000012a0| 20 63 6c 6f 73 65 64 20 | 0d 09 7b 0d 09 09 44 69 | closed |..{...Di|
|000012b0| 73 61 62 6c 65 49 74 65 | 6d 28 6d 68 6e 64 6c 2c |sableIte|m(mhndl,|
|000012c0| 20 69 43 6c 6f 73 65 29 | 3b 0d 09 09 44 69 73 61 | iClose)|;...Disa|
|000012d0| 62 6c 65 49 74 65 6d 28 | 6d 68 6e 64 6c 2c 20 69 |bleItem(|mhndl, i|
|000012e0| 53 61 76 65 29 3b 0d 09 | 09 44 69 73 61 62 6c 65 |Save);..|.Disable|
|000012f0| 49 74 65 6d 28 6d 68 6e | 64 6c 2c 20 69 53 61 76 |Item(mhn|dl, iSav|
|00001300| 65 41 73 29 3b 0d 09 09 | 44 69 73 61 62 6c 65 49 |eAs);...|DisableI|
|00001310| 74 65 6d 28 6d 68 6e 64 | 6c 2c 20 69 50 61 67 65 |tem(mhnd|l, iPage|
|00001320| 53 65 74 75 70 29 3b 0d | 09 09 44 69 73 61 62 6c |Setup);.|..Disabl|
|00001330| 65 49 74 65 6d 28 6d 68 | 6e 64 6c 2c 20 69 50 72 |eItem(mh|ndl, iPr|
|00001340| 69 6e 74 29 3b 0d 09 09 | 44 69 73 61 62 6c 65 49 |int);...|DisableI|
|00001350| 74 65 6d 28 6d 68 6e 64 | 6c 2c 20 69 50 72 69 6e |tem(mhnd|l, iPrin|
|00001360| 74 4f 6e 65 29 3b 0d 09 | 7d 0d 0d 09 2f 2a 20 4e |tOne);..|}.../* N|
|00001370| 6f 77 20 74 68 65 20 45 | 64 69 74 20 4d 65 6e 75 |ow the E|dit Menu|
|00001380| 2e 20 49 66 20 74 68 65 | 20 77 69 6e 64 6f 77 73 |. If the| windows|
|00001390| 20 61 72 65 20 75 70 2c | 20 65 6e 61 62 6c 65 20 | are up,| enable |
|000013a0| 43 75 74 2c 20 43 6f 70 | 79 2c 20 61 6e 64 20 43 |Cut, Cop|y, and C|
|000013b0| 6c 65 61 72 20 0d 09 09 | 61 75 74 6f 6d 61 74 69 |lear ...|automati|
|000013c0| 63 61 6c 6c 79 2c 20 61 | 6e 64 20 55 6e 64 6f 20 |cally, a|nd Undo |
|000013d0| 61 6e 64 20 50 61 73 74 | 65 20 63 6f 6e 64 69 74 |and Past|e condit|
|000013e0| 69 6f 6e 61 6c 6c 79 2e | 20 4f 74 68 65 72 77 69 |ionally.| Otherwi|
|000013f0| 73 65 2c 20 64 69 73 61 | 62 6c 65 20 65 76 65 72 |se, disa|ble ever|
|00001400| 79 74 68 69 6e 67 20 2a | 2f 0d 09 09 0d 09 6d 68 |ything *|/.....mh|
|00001410| 6e 64 6c 20 3d 20 67 53 | 68 65 6c 6c 4d 65 6e 75 |ndl = gS|hellMenu|
|00001420| 48 61 6e 64 6c 65 73 5b | 6b 45 64 69 74 4d 65 6e |Handles[|kEditMen|
|00001430| 75 5d 3b 0d 09 69 66 28 | 77 69 6e 64 6f 77 73 55 |u];..if(|windowsU|
|00001440| 70 29 0d 09 7b 0d 09 09 | 45 6e 61 62 6c 65 49 74 |p)..{...|EnableIt|
|00001450| 65 6d 28 6d 68 6e 64 6c | 2c 20 69 43 75 74 29 3b |em(mhndl|, iCut);|
|00001460| 0d 09 09 45 6e 61 62 6c | 65 49 74 65 6d 28 6d 68 |...Enabl|eItem(mh|
|00001470| 6e 64 6c 2c 20 69 43 6f | 70 79 29 3b 0d 09 09 45 |ndl, iCo|py);...E|
|00001480| 6e 61 62 6c 65 49 74 65 | 6d 28 6d 68 6e 64 6c 2c |nableIte|m(mhndl,|
|00001490| 20 69 43 6c 65 61 72 29 | 3b 0d 09 09 0d 09 09 2f | iClear)|;....../|
|000014a0| 2f 20 20 46 6f 72 20 50 | 61 73 74 65 3a 20 68 61 |/  For P|aste: ha|
|000014b0| 76 65 20 74 6f 20 73 65 | 65 20 69 66 20 74 68 65 |ve to se|e if the|
|000014c0| 72 65 20 69 73 20 61 20 | 50 49 43 54 20 69 6e 20 |re is a |PICT in |
|000014d0| 74 68 65 20 73 63 72 61 | 70 20 0d 09 09 70 69 63 |the scra|p ...pic|
|000014e0| 74 53 69 7a 65 20 3d 20 | 47 65 74 53 63 72 61 70 |tSize = |GetScrap|
|000014f0| 28 6e 69 6c 2c 20 27 50 | 49 43 54 27 2c 20 26 69 |(nil, 'P|ICT', &i|
|00001500| 67 6e 6f 72 65 64 29 3b | 0d 09 09 69 66 28 70 69 |gnored);|...if(pi|
|00001510| 63 74 53 69 7a 65 20 3e | 20 30 29 20 2f 2f 20 20 |ctSize >| 0) //  |
|00001520| 57 65 20 68 61 76 65 20 | 61 20 50 49 43 54 20 69 |We have |a PICT i|
|00001530| 6e 20 74 68 65 20 73 63 | 72 61 70 20 0d 09 09 09 |n the sc|rap ....|
|00001540| 45 6e 61 62 6c 65 49 74 | 65 6d 28 6d 68 6e 64 6c |EnableIt|em(mhndl|
|00001550| 2c 20 69 50 61 73 74 65 | 29 3b 0d 09 09 65 6c 73 |, iPaste|);...els|
|00001560| 65 0d 09 09 09 44 69 73 | 61 62 6c 65 49 74 65 6d |e....Dis|ableItem|
|00001570| 28 6d 68 6e 64 6c 2c 20 | 69 50 61 73 74 65 29 3b |(mhndl, |iPaste);|
|00001580| 0d 09 09 0d 09 09 2f 2f | 20 20 4e 6f 77 20 55 6e |......//|  Now Un|
|00001590| 64 6f 3a 20 0d 09 09 44 | 69 73 61 62 6c 65 49 74 |do: ...D|isableIt|
|000015a0| 65 6d 28 6d 68 6e 64 6c | 2c 20 69 55 6e 64 6f 29 |em(mhndl|, iUndo)|
|000015b0| 3b 0d 09 7d 0d 09 65 6c | 73 65 0d 09 7b 0d 09 09 |;..}..el|se..{...|
|000015c0| 44 69 73 61 62 6c 65 49 | 74 65 6d 28 6d 68 6e 64 |DisableI|tem(mhnd|
|000015d0| 6c 2c 20 69 55 6e 64 6f | 29 3b 0d 09 09 44 69 73 |l, iUndo|);...Dis|
|000015e0| 61 62 6c 65 49 74 65 6d | 28 6d 68 6e 64 6c 2c 20 |ableItem|(mhndl, |
|000015f0| 69 43 75 74 29 3b 0d 09 | 09 44 69 73 61 62 6c 65 |iCut);..|.Disable|
|00001600| 49 74 65 6d 28 6d 68 6e | 64 6c 2c 20 69 43 6f 70 |Item(mhn|dl, iCop|
|00001610| 79 29 3b 0d 09 09 44 69 | 73 61 62 6c 65 49 74 65 |y);...Di|sableIte|
|00001620| 6d 28 6d 68 6e 64 6c 2c | 20 69 50 61 73 74 65 29 |m(mhndl,| iPaste)|
|00001630| 3b 0d 09 09 44 69 73 61 | 62 6c 65 49 74 65 6d 28 |;...Disa|bleItem(|
|00001640| 6d 68 6e 64 6c 2c 20 69 | 43 6c 65 61 72 29 3b 0d |mhndl, i|Clear);.|
|00001650| 09 7d 0d 09 0d 09 2f 2f | 20 4e 6f 77 20 74 68 65 |.}....//| Now the|
|00001660| 20 41 70 70 0d 09 41 70 | 70 41 64 6a 75 73 74 4d | App..Ap|pAdjustM|
|00001670| 65 6e 75 73 28 29 3b 0d | 7d 09 0d 0d 0d 2f 2f 20 |enus();.|}....// |
|00001680| 48 61 6e 64 6c 65 20 73 | 63 72 6f 6c 6c 62 61 72 |Handle s|crollbar|
|00001690| 73 0d 76 6f 69 64 20 44 | 6f 43 6f 6e 74 65 6e 74 |s.void D|oContent|
|000016a0| 43 6c 69 63 6b 28 50 6f | 69 6e 74 20 74 68 65 50 |Click(Po|int theP|
|000016b0| 74 2c 20 57 69 6e 64 6f | 77 50 74 72 20 77 69 6e |t, Windo|wPtr win|
|000016c0| 64 2c 20 42 6f 6f 6c 65 | 61 6e 20 64 6f 75 62 6c |d, Boole|an doubl|
|000016d0| 65 43 6c 69 63 6b 2c 20 | 45 76 65 6e 74 52 65 63 |eClick, |EventRec|
|000016e0| 6f 72 64 20 2a 65 76 65 | 6e 74 70 74 72 29 0d 7b |ord *eve|ntptr).{|
|000016f0| 0d 09 50 6f 69 6e 74 09 | 09 09 09 6c 61 73 74 50 |..Point.|...lastP|
|00001700| 6f 69 6e 74 20 3d 20 7b | 30 2c 20 30 7d 3b 0d 09 |oint = {|0, 0};..|
|00001710| 73 68 6f 72 74 09 09 09 | 09 70 61 72 74 2c 20 76 |short...|.part, v|
|00001720| 61 6c 75 65 3b 0d 09 43 | 6f 6e 74 72 6f 6c 48 61 |alue;..C|ontrolHa|
|00001730| 6e 64 6c 65 09 09 63 6f | 6e 74 72 6f 6c 3b 0d 09 |ndle..co|ntrol;..|
|00001740| 44 6f 63 48 61 6e 64 6c | 65 09 09 09 64 6f 63 3b |DocHandl|e...doc;|
|00001750| 0d 0d 09 64 6f 63 20 3d | 20 47 65 74 57 69 6e 64 |...doc =| GetWind|
|00001760| 6f 77 44 6f 63 28 77 69 | 6e 64 29 3b 0d 09 69 66 |owDoc(wi|nd);..if|
|00001770| 28 64 6f 63 20 3d 3d 20 | 6e 69 6c 29 0d 09 09 72 |(doc == |nil)...r|
|00001780| 65 74 75 72 6e 3b 0d 09 | 09 09 09 09 0d 09 2f 2f |eturn;..|......//|
|00001790| 20 20 4c 6f 6f 6b 20 66 | 6f 72 20 61 20 63 6c 69 |  Look f|or a cli|
|000017a0| 63 6b 20 69 6e 20 61 20 | 73 63 72 6f 6c 6c 62 61 |ck in a |scrollba|
|000017b0| 72 3a 20 69 66 20 73 6f | 20 64 65 61 6c 20 77 69 |r: if so| deal wi|
|000017c0| 74 68 20 69 74 20 0d 09 | 70 61 72 74 20 3d 20 46 |th it ..|part = F|
|000017d0| 69 6e 64 43 6f 6e 74 72 | 6f 6c 28 74 68 65 50 74 |indContr|ol(thePt|
|000017e0| 2c 20 77 69 6e 64 2c 20 | 26 63 6f 6e 74 72 6f 6c |, wind, |&control|
|000017f0| 29 3b 0d 09 69 66 28 70 | 61 72 74 20 21 3d 20 30 |);..if(p|art != 0|
|00001800| 29 0d 09 7b 0d 09 09 73 | 77 69 74 63 68 20 28 20 |)..{...s|witch ( |
|00001810| 70 61 72 74 20 29 0d 09 | 09 7b 0d 09 09 09 2f 2f |part )..|.{....//|
|00001820| 20 20 54 68 65 20 74 68 | 75 6d 62 20 69 73 20 73 |  The th|umb is s|
|00001830| 70 65 63 69 61 6c 2c 20 | 61 6e 64 20 64 6f 65 73 |pecial, |and does|
|00001840| 6e 27 74 20 75 73 65 20 | 74 68 65 20 41 63 74 69 |n't use |the Acti|
|00001850| 6f 6e 20 50 72 6f 63 20 | 0d 09 09 09 63 61 73 65 |on Proc |....case|
|00001860| 20 69 6e 54 68 75 6d 62 | 3a 20 0d 09 09 09 09 76 | inThumb|: .....v|
|00001870| 61 6c 75 65 20 3d 20 47 | 65 74 43 74 6c 56 61 6c |alue = G|etCtlVal|
|00001880| 75 65 28 63 6f 6e 74 72 | 6f 6c 29 3b 0d 09 09 09 |ue(contr|ol);....|
|00001890| 09 70 61 72 74 20 3d 20 | 54 72 61 63 6b 43 6f 6e |.part = |TrackCon|
|000018a0| 74 72 6f 6c 28 63 6f 6e | 74 72 6f 6c 2c 20 74 68 |trol(con|trol, th|
|000018b0| 65 50 74 2c 20 6e 69 6c | 29 3b 0d 09 09 09 09 69 |ePt, nil|);.....i|
|000018c0| 66 20 28 20 70 61 72 74 | 20 21 3d 20 30 20 29 20 |f ( part| != 0 ) |
|000018d0| 2f 2f 20 20 47 6f 6f 64 | 20 74 68 75 6d 62 20 64 |//  Good| thumb d|
|000018e0| 72 61 67 20 0d 09 09 09 | 09 7b 20 0d 09 09 09 09 |rag ....|.{ .....|
|000018f0| 09 76 61 6c 75 65 20 2d | 3d 20 47 65 74 43 74 6c |.value -|= GetCtl|
|00001900| 56 61 6c 75 65 28 63 6f | 6e 74 72 6f 6c 29 3b 0d |Value(co|ntrol);.|
|00001910| 09 09 09 09 09 2f 2f 20 | 20 76 61 6c 75 65 20 6e |.....// | value n|
|00001920| 6f 77 20 68 61 73 20 43 | 48 41 4e 47 45 20 69 6e |ow has C|HANGE in|
|00001930| 20 76 61 6c 75 65 3b 20 | 69 66 20 76 61 6c 75 65 | value; |if value|
|00001940| 20 63 68 61 6e 67 65 64 | 2c 20 73 63 72 6f 6c 6c | changed|, scroll|
|00001950| 20 0d 09 09 09 09 09 69 | 66 20 28 20 76 61 6c 75 | ......i|f ( valu|
|00001960| 65 20 21 3d 20 30 20 29 | 0d 09 09 09 09 09 09 69 |e != 0 )|.......i|
|00001970| 66 20 28 20 63 6f 6e 74 | 72 6f 6c 20 3d 3d 20 28 |f ( cont|rol == (|
|00001980| 2a 64 6f 63 29 2d 3e 68 | 53 63 72 6f 6c 6c 20 29 |*doc)->h|Scroll )|
|00001990| 0d 09 09 09 09 09 09 09 | 44 6f 53 63 72 6f 6c 6c |........|DoScroll|
|000019a0| 28 77 69 6e 64 2c 20 76 | 61 6c 75 65 2c 20 30 2c |(wind, v|alue, 0,|
|000019b0| 20 74 72 75 65 29 3b 0d | 09 09 09 09 09 09 65 6c | true);.|......el|
|000019c0| 73 65 0d 09 09 09 09 09 | 09 09 44 6f 53 63 72 6f |se......|..DoScro|
|000019d0| 6c 6c 28 77 69 6e 64 2c | 20 30 2c 20 76 61 6c 75 |ll(wind,| 0, valu|
|000019e0| 65 2c 20 74 72 75 65 29 | 3b 0d 09 09 09 09 7d 0d |e, true)|;.....}.|
|000019f0| 09 09 09 09 62 72 65 61 | 6b 3b 0d 09 09 09 09 0d |....brea|k;......|
|00001a00| 09 09 09 64 65 66 61 75 | 6c 74 3a 09 2f 2f 20 20 |...defau|lt:.//  |
|00001a10| 74 68 65 79 20 63 6c 69 | 63 6b 65 64 20 69 6e 20 |they cli|cked in |
|00001a20| 61 6e 20 61 72 72 6f 77 | 2c 20 73 6f 20 74 72 61 |an arrow|, so tra|
|00001a30| 63 6b 20 26 20 73 63 72 | 6f 6c 6c 20 0d 09 09 09 |ck & scr|oll ....|
|00001a40| 09 76 61 6c 75 65 20 3d | 20 54 72 61 63 6b 43 6f |.value =| TrackCo|
|00001a50| 6e 74 72 6f 6c 28 63 6f | 6e 74 72 6f 6c 2c 20 74 |ntrol(co|ntrol, t|
|00001a60| 68 65 50 74 2c 20 67 53 | 63 72 6f 6c 6c 41 63 74 |hePt, gS|crollAct|
|00001a70| 69 6f 6e 55 50 50 29 3b | 0d 09 09 09 09 62 72 65 |ionUPP);|.....bre|
|00001a80| 61 6b 3b 0d 09 09 7d 0d | 09 7d 0d 09 65 6c 73 65 |ak;...}.|.}..else|
|00001a90| 0d 09 09 41 70 70 43 6c | 69 63 6b 28 74 68 65 50 |...AppCl|ick(theP|
|00001aa0| 74 2c 20 77 69 6e 64 2c | 20 64 6f 75 62 6c 65 43 |t, wind,| doubleC|
|00001ab0| 6c 69 63 6b 2c 20 65 76 | 65 6e 74 70 74 72 29 3b |lick, ev|entptr);|
|00001ac0| 0d 7d 0d 0d 2f 2f 20 47 | 72 6f 77 20 74 68 65 20 |.}..// G|row the |
|00001ad0| 77 69 6e 64 6f 77 2c 20 | 61 64 6a 75 73 74 69 6e |window, |adjustin|
|00001ae0| 67 20 73 63 72 6f 6c 6c | 20 62 61 72 73 20 61 6e |g scroll| bars an|
|00001af0| 64 20 73 75 63 68 2c 20 | 74 68 65 6e 20 69 6e 66 |d such, |then inf|
|00001b00| 6f 72 6d 20 74 68 65 20 | 41 70 70 20 77 68 61 74 |orm the |App what|
|00001b10| 20 68 61 70 70 65 6e 65 | 64 0d 76 6f 69 64 20 44 | happene|d.void D|
|00001b20| 6f 47 72 6f 77 57 69 6e | 64 6f 77 28 57 69 6e 64 |oGrowWin|dow(Wind|
|00001b30| 6f 77 50 74 72 20 77 69 | 6e 64 2c 20 50 6f 69 6e |owPtr wi|nd, Poin|
|00001b40| 74 20 77 68 65 72 65 29 | 0d 7b 0d 09 52 65 63 74 |t where)|.{..Rect|
|00001b50| 09 09 09 6c 69 6d 69 74 | 73 3b 0d 09 6c 6f 6e 67 |...limit|s;..long|
|00001b60| 09 09 09 73 69 7a 65 3b | 0d 09 44 6f 63 48 61 6e |...size;|..DocHan|
|00001b70| 64 6c 65 09 09 64 6f 63 | 3b 0d 09 0d 09 64 6f 63 |dle..doc|;....doc|
|00001b80| 20 3d 20 47 65 74 57 69 | 6e 64 6f 77 44 6f 63 28 | = GetWi|ndowDoc(|
|00001b90| 77 69 6e 64 29 3b 0d 09 | 69 66 28 64 6f 63 20 3d |wind);..|if(doc =|
|00001ba0| 3d 20 6e 69 6c 29 0d 09 | 09 72 65 74 75 72 6e 3b |= nil)..|.return;|
|00001bb0| 0d 09 09 09 0d 09 2f 2f | 20 20 44 6f 20 6e 6f 74 |......//|  Do not|
|00001bc0| 68 69 6e 67 20 69 66 20 | 6e 6f 74 20 6f 75 72 20 |hing if |not our |
|00001bd0| 77 69 6e 64 6f 77 20 0d | 09 69 66 28 49 73 41 70 |window .|.if(IsAp|
|00001be0| 70 57 69 6e 64 6f 77 28 | 77 69 6e 64 29 20 3d 3d |pWindow(|wind) ==|
|00001bf0| 20 66 61 6c 73 65 29 0d | 09 09 72 65 74 75 72 6e | false).|..return|
|00001c00| 3b 0d 09 09 0d 09 2f 2f | 20 20 53 65 74 20 75 70 |;.....//|  Set up|
|00001c10| 20 73 69 7a 65 20 6c 69 | 6d 69 74 73 20 0d 09 6c | size li|mits ..l|
|00001c20| 69 6d 69 74 73 2e 74 6f | 70 20 3d 20 6c 69 6d 69 |imits.to|p = limi|
|00001c30| 74 73 2e 6c 65 66 74 20 | 3d 20 6b 4d 69 6e 57 69 |ts.left |= kMinWi|
|00001c40| 6e 64 6f 77 53 69 7a 65 | 3b 20 2f 2f 20 20 4f 6e |ndowSize|; //  On|
|00001c50| 65 20 69 6e 63 68 20 6d | 69 6e 69 6d 75 6d 20 0d |e inch m|inimum .|
|00001c60| 09 2f 2a 20 54 68 65 73 | 65 20 61 72 65 20 61 63 |./* Thes|e are ac|
|00001c70| 74 75 61 6c 6c 79 20 62 | 69 67 67 65 72 20 74 68 |tually b|igger th|
|00001c80| 61 6e 20 74 68 65 20 6d | 61 78 69 6d 75 6d 20 73 |an the m|aximum s|
|00001c90| 69 7a 65 20 6f 66 20 74 | 68 65 20 70 6f 72 74 52 |ize of t|he portR|
|00001ca0| 65 63 74 2c 20 0d 09 73 | 69 6e 63 65 20 74 68 65 |ect, ..s|ince the|
|00001cb0| 20 6f 75 74 6c 69 6e 65 | 20 64 72 61 67 67 65 64 | outline| dragged|
|00001cc0| 20 62 79 20 47 72 6f 77 | 57 69 6e 64 6f 77 20 69 | by Grow|Window i|
|00001cd0| 73 20 74 68 65 20 6f 75 | 74 6c 69 6e 65 20 6f 66 |s the ou|tline of|
|00001ce0| 20 74 68 65 20 77 69 6e | 64 6f 77 20 66 72 61 6d | the win|dow fram|
|00001cf0| 65 2c 0d 09 6e 6f 74 20 | 69 74 73 20 70 6f 72 74 |e,..not |its port|
|00001d00| 52 65 63 74 20 2a 2f 0d | 09 6c 69 6d 69 74 73 2e |Rect */.|.limits.|
|00001d10| 72 69 67 68 74 20 3d 20 | 28 2a 64 6f 63 29 2d 3e |right = |(*doc)->|
|00001d20| 63 6f 6e 74 65 6e 74 53 | 69 7a 65 2e 68 20 2b 20 |contentS|ize.h + |
|00001d30| 6b 53 63 72 6f 6c 6c 41 | 64 6a 75 73 74 20 2b 20 |kScrollA|djust + |
|00001d40| 67 44 6f 63 46 72 61 6d | 65 57 69 64 74 68 3b 0d |gDocFram|eWidth;.|
|00001d50| 09 6c 69 6d 69 74 73 2e | 62 6f 74 74 6f 6d 20 3d |.limits.|bottom =|
|00001d60| 20 28 2a 64 6f 63 29 2d | 3e 63 6f 6e 74 65 6e 74 | (*doc)-|>content|
|00001d70| 53 69 7a 65 2e 76 20 2b | 20 6b 53 63 72 6f 6c 6c |Size.v +| kScroll|
|00001d80| 41 64 6a 75 73 74 20 2b | 20 67 44 6f 63 46 72 61 |Adjust +| gDocFra|
|00001d90| 6d 65 57 69 64 74 68 3b | 0d 09 0d 09 2f 2f 20 20 |meWidth;|....//  |
|00001da0| 4c 65 74 20 74 68 65 20 | 75 73 65 72 20 67 72 6f |Let the |user gro|
|00001db0| 77 20 74 68 65 20 77 69 | 6e 64 6f 77 20 0d 09 73 |w the wi|ndow ..s|
|00001dc0| 69 7a 65 20 3d 20 47 72 | 6f 77 57 69 6e 64 6f 77 |ize = Gr|owWindow|
|00001dd0| 28 77 69 6e 64 2c 20 77 | 68 65 72 65 2c 20 26 6c |(wind, w|here, &l|
|00001de0| 69 6d 69 74 73 29 3b 0d | 09 0d 09 2f 2a 20 49 66 |imits);.|.../* If|
|00001df0| 20 74 68 65 20 73 69 7a | 65 20 63 68 61 6e 67 65 | the siz|e change|
|00001e00| 64 2c 20 74 68 65 6e 20 | 65 72 61 73 65 20 74 68 |d, then |erase th|
|00001e10| 65 20 73 63 72 6f 6c 6c | 62 61 72 73 20 61 6e 64 |e scroll|bars and|
|00001e20| 20 67 72 6f 77 20 62 6f | 78 20 61 72 65 61 20 61 | grow bo|x area a|
|00001e30| 6e 64 20 73 69 7a 65 20 | 74 68 65 20 0d 09 77 69 |nd size |the ..wi|
|00001e40| 6e 64 6f 77 2c 20 61 64 | 6a 75 73 74 69 6e 67 20 |ndow, ad|justing |
|00001e50| 74 68 65 20 73 63 72 6f | 6c 6c 20 62 61 72 73 20 |the scro|ll bars |
|00001e60| 61 6e 64 20 73 6f 20 6f | 6e 20 2a 2f 0d 09 69 66 |and so o|n */..if|
|00001e70| 28 73 69 7a 65 20 21 3d | 20 30 29 0d 09 7b 0d 09 |(size !=| 0)..{..|
|00001e80| 09 52 65 63 74 09 74 65 | 6d 70 52 65 63 74 3b 0d |.Rect.te|mpRect;.|
|00001e90| 09 09 73 68 6f 72 74 09 | 68 53 69 7a 65 2c 20 76 |..short.|hSize, v|
|00001ea0| 53 69 7a 65 3b 0d 09 09 | 0d 09 09 53 65 74 50 6f |Size;...|...SetPo|
|00001eb0| 72 74 28 77 69 6e 64 29 | 3b 0d 09 09 0d 09 09 2f |rt(wind)|;....../|
|00001ec0| 2f 20 20 53 68 6f 75 6c | 64 20 65 72 61 73 65 20 |/  Shoul|d erase |
|00001ed0| 74 68 65 20 73 63 72 6f | 6c 6c 62 61 72 73 20 61 |the scro|llbars a|
|00001ee0| 6e 64 20 67 72 6f 77 20 | 62 6f 78 20 61 72 65 61 |nd grow |box area|
|00001ef0| 20 62 65 66 6f 72 65 20 | 72 65 73 69 7a 69 6e 67 | before |resizing|
|00001f00| 20 74 68 65 20 77 69 6e | 64 6f 77 3a 20 0d 09 09 | the win|dow: ...|
|00001f10| 2f 2f 20 20 6d 61 6b 65 | 20 61 20 72 65 63 74 20 |//  make| a rect |
|00001f20| 66 6f 72 20 74 68 65 20 | 67 72 6f 77 42 6f 78 20 |for the |growBox |
|00001f30| 0d 09 09 74 65 6d 70 52 | 65 63 74 20 3d 20 77 69 |...tempR|ect = wi|
|00001f40| 6e 64 2d 3e 70 6f 72 74 | 52 65 63 74 3b 0d 09 09 |nd->port|Rect;...|
|00001f50| 74 65 6d 70 52 65 63 74 | 2e 74 6f 70 20 3d 20 74 |tempRect|.top = t|
|00001f60| 65 6d 70 52 65 63 74 2e | 62 6f 74 74 6f 6d 20 2d |empRect.|bottom -|
|00001f70| 20 6b 53 63 72 6f 6c 6c | 41 64 6a 75 73 74 3b 0d | kScroll|Adjust;.|
|00001f80| 09 09 74 65 6d 70 52 65 | 63 74 2e 6c 65 66 74 20 |..tempRe|ct.left |
|00001f90| 3d 20 74 65 6d 70 52 65 | 63 74 2e 72 69 67 68 74 |= tempRe|ct.right|
|00001fa0| 20 2d 20 6b 53 63 72 6f | 6c 6c 41 64 6a 75 73 74 | - kScro|llAdjust|
|00001fb0| 3b 0d 09 09 0d 09 09 2f | 2f 20 20 45 72 61 73 65 |;....../|/  Erase|
|00001fc0| 20 69 74 20 61 6e 64 20 | 74 68 65 20 73 63 72 6f | it and |the scro|
|00001fd0| 6c 6c 20 62 61 72 73 20 | 0d 09 09 45 72 61 73 65 |ll bars |...Erase|
|00001fe0| 52 65 63 74 28 26 74 65 | 6d 70 52 65 63 74 29 3b |Rect(&te|mpRect);|
|00001ff0| 0d 09 09 49 6e 76 61 6c | 52 65 63 74 28 26 74 65 |...Inval|Rect(&te|
|00002000| 6d 70 52 65 63 74 29 3b | 20 2f 2f 20 61 64 64 20 |mpRect);| // add |
|00002010| 74 6f 20 75 70 64 61 74 | 65 20 72 65 67 69 6f 6e |to updat|e region|
|00002020| 0d 09 09 48 69 64 65 43 | 6f 6e 74 72 6f 6c 28 28 |...HideC|ontrol((|
|00002030| 2a 64 6f 63 29 2d 3e 68 | 53 63 72 6f 6c 6c 29 3b |*doc)->h|Scroll);|
|00002040| 0d 09 09 48 69 64 65 43 | 6f 6e 74 72 6f 6c 28 28 |...HideC|ontrol((|
|00002050| 2a 64 6f 63 29 2d 3e 76 | 53 63 72 6f 6c 6c 29 3b |*doc)->v|Scroll);|
|00002060| 0d 09 09 0d 09 09 2f 2a | 20 4f 4b 2c 20 73 69 7a |....../*| OK, siz|
|00002070| 65 20 69 74 2c 20 62 75 | 74 20 66 69 72 73 74 20 |e it, bu|t first |
|00002080| 6d 61 6b 65 20 73 75 72 | 65 20 74 68 61 74 20 74 |make sur|e that t|
|00002090| 68 65 20 73 69 7a 65 20 | 69 73 20 77 69 74 68 69 |he size |is withi|
|000020a0| 6e 20 6c 69 6d 69 74 73 | 20 28 75 73 65 72 73 0d |n limits| (users.|
|000020b0| 09 09 63 61 6e 20 68 6f | 6c 64 20 64 6f 77 6e 20 |..can ho|ld down |
|000020c0| 74 68 65 20 63 6f 6d 6d | 61 6e 64 20 6b 65 79 20 |the comm|and key |
|000020d0| 74 6f 20 62 79 70 61 73 | 73 20 74 68 65 20 6c 69 |to bypas|s the li|
|000020e0| 6d 69 74 2c 20 62 75 74 | 20 77 65 20 77 6f 6e 27 |mit, but| we won'|
|000020f0| 74 20 6c 65 74 20 27 65 | 6d 29 2e 20 0d 09 09 4e |t let 'e|m). ...N|
|00002100| 6f 74 65 20 74 68 61 74 | 20 77 65 20 73 75 62 74 |ote that| we subt|
|00002110| 72 61 63 74 20 66 72 6f | 6d 20 74 68 65 20 6c 69 |ract fro|m the li|
|00002120| 6d 69 74 73 20 74 6f 20 | 61 63 63 6f 75 6e 74 20 |mits to |account |
|00002130| 66 6f 72 20 74 68 65 20 | 77 69 6e 64 6f 77 20 66 |for the |window f|
|00002140| 72 61 6d 65 20 2a 2f 0d | 09 09 68 53 69 7a 65 20 |rame */.|..hSize |
|00002150| 3d 20 4c 6f 57 6f 72 64 | 28 73 69 7a 65 29 3b 0d |= LoWord|(size);.|
|00002160| 09 09 76 53 69 7a 65 20 | 3d 20 48 69 57 6f 72 64 |..vSize |= HiWord|
|00002170| 28 73 69 7a 65 29 3b 0d | 09 09 69 66 28 68 53 69 |(size);.|..if(hSi|
|00002180| 7a 65 20 3e 20 6c 69 6d | 69 74 73 2e 72 69 67 68 |ze > lim|its.righ|
|00002190| 74 20 2d 20 67 44 6f 63 | 46 72 61 6d 65 57 69 64 |t - gDoc|FrameWid|
|000021a0| 74 68 29 20 68 53 69 7a | 65 20 3d 20 6c 69 6d 69 |th) hSiz|e = limi|
|000021b0| 74 73 2e 72 69 67 68 74 | 20 2d 20 67 44 6f 63 46 |ts.right| - gDocF|
|000021c0| 72 61 6d 65 57 69 64 74 | 68 3b 0d 09 09 69 66 28 |rameWidt|h;...if(|
|000021d0| 76 53 69 7a 65 20 3e 20 | 6c 69 6d 69 74 73 2e 62 |vSize > |limits.b|
|000021e0| 6f 74 74 6f 6d 20 2d 20 | 67 44 6f 63 46 72 61 6d |ottom - |gDocFram|
|000021f0| 65 57 69 64 74 68 29 20 | 76 53 69 7a 65 20 3d 20 |eWidth) |vSize = |
|00002200| 6c 69 6d 69 74 73 2e 62 | 6f 74 74 6f 6d 20 2d 20 |limits.b|ottom - |
|00002210| 67 44 6f 63 46 72 61 6d | 65 57 69 64 74 68 3b 0d |gDocFram|eWidth;.|
|00002220| 09 09 53 69 7a 65 57 69 | 6e 64 6f 77 28 77 69 6e |..SizeWi|ndow(win|
|00002230| 64 2c 20 68 53 69 7a 65 | 2c 20 76 53 69 7a 65 2c |d, hSize|, vSize,|
|00002240| 20 74 72 75 65 29 3b 0d | 09 09 43 6c 69 70 52 65 | true);.|..ClipRe|
|00002250| 63 74 28 26 77 69 6e 64 | 2d 3e 70 6f 72 74 52 65 |ct(&wind|->portRe|
|00002260| 63 74 29 3b 0d 09 09 0d | 09 09 2f 2f 20 52 65 73 |ct);....|..// Res|
|00002270| 65 74 20 67 78 20 63 6c | 69 70 20 0d 09 09 52 65 |et gx cl|ip ...Re|
|00002280| 73 65 74 47 58 43 6c 69 | 70 28 77 69 6e 64 29 3b |setGXCli|p(wind);|
|00002290| 0d 0d 09 09 2f 2f 20 20 | 61 64 6a 75 73 74 20 73 |....//  |adjust s|
|000022a0| 63 72 6f 6c 6c 42 61 72 | 73 20 0d 09 09 41 64 6a |crollBar|s ...Adj|
|000022b0| 75 73 74 53 63 72 6f 6c | 6c 62 61 72 73 28 77 69 |ustScrol|lbars(wi|
|000022c0| 6e 64 2c 20 74 72 75 65 | 29 3b 0d 09 09 0d 09 09 |nd, true|);......|
|000022d0| 2f 2f 20 20 72 65 2d 73 | 68 6f 77 20 63 6f 6e 74 |//  re-s|how cont|
|000022e0| 72 6f 6c 73 20 61 6e 64 | 20 67 72 6f 77 20 69 63 |rols and| grow ic|
|000022f0| 6f 6e 20 69 66 20 69 6e | 20 74 68 65 20 66 72 6f |on if in| the fro|
|00002300| 6e 74 20 0d 09 09 69 66 | 28 46 72 6f 6e 74 57 69 |nt ...if|(FrontWi|
|00002310| 6e 64 6f 77 28 29 20 3d | 3d 20 77 69 6e 64 29 0d |ndow() =|= wind).|
|00002320| 09 09 7b 0d 09 09 09 53 | 68 6f 77 43 6f 6e 74 72 |..{....S|howContr|
|00002330| 6f 6c 28 28 2a 64 6f 63 | 29 2d 3e 68 53 63 72 6f |ol((*doc|)->hScro|
|00002340| 6c 6c 29 3b 0d 09 09 09 | 53 68 6f 77 43 6f 6e 74 |ll);....|ShowCont|
|00002350| 72 6f 6c 28 28 2a 64 6f | 63 29 2d 3e 76 53 63 72 |rol((*do|c)->vScr|
|00002360| 6f 6c 6c 29 3b 0d 09 09 | 09 44 72 61 77 47 72 6f |oll);...|.DrawGro|
|00002370| 77 49 63 6f 6e 28 77 69 | 6e 64 29 3b 0d 09 09 7d |wIcon(wi|nd);...}|
|00002380| 0d 09 09 09 0d 09 09 2f | 2f 20 54 65 6c 6c 20 61 |......./|/ Tell a|
|00002390| 70 70 6c 69 63 61 74 69 | 6f 6e 20 61 62 6f 75 74 |pplicati|on about|
|000023a0| 20 69 74 0d 09 09 41 70 | 70 47 72 6f 77 57 69 6e | it...Ap|pGrowWin|
|000023b0| 64 6f 77 28 77 69 6e 64 | 2c 20 68 53 69 7a 65 2c |dow(wind|, hSize,|
|000023c0| 20 76 53 69 7a 65 29 3b | 0d 09 7d 0d 7d 0d 0d 76 | vSize);|..}.}..v|
|000023d0| 6f 69 64 20 44 6f 5a 6f | 6f 6d 57 69 6e 64 6f 77 |oid DoZo|omWindow|
|000023e0| 28 57 69 6e 64 6f 77 50 | 74 72 20 77 69 6e 64 2c |(WindowP|tr wind,|
|000023f0| 20 73 68 6f 72 74 20 7a | 6f 6f 6d 44 69 72 29 0d | short z|oomDir).|
|00002400| 7b 0d 09 52 65 63 74 09 | 09 09 77 6f 72 6c 64 52 |{..Rect.|..worldR|
|00002410| 65 63 74 20 3d 20 7b 30 | 2c 20 30 2c 20 30 2c 20 |ect = {0|, 0, 0, |
|00002420| 30 7d 3b 0d 09 44 6f 63 | 48 61 6e 64 6c 65 09 09 |0};..Doc|Handle..|
|00002430| 64 6f 63 3b 0d 09 0d 09 | 2f 2f 20 20 44 6f 20 6e |doc;....|//  Do n|
|00002440| 6f 74 68 69 6e 67 20 69 | 66 20 6e 6f 74 20 6f 75 |othing i|f not ou|
|00002450| 72 20 77 69 6e 64 6f 77 | 20 0d 09 64 6f 63 20 3d |r window| ..doc =|
|00002460| 20 47 65 74 57 69 6e 64 | 6f 77 44 6f 63 28 77 69 | GetWind|owDoc(wi|
|00002470| 6e 64 29 3b 0d 09 69 66 | 28 64 6f 63 20 3d 3d 20 |nd);..if|(doc == |
|00002480| 6e 69 6c 29 0d 09 09 72 | 65 74 75 72 6e 3b 0d 09 |nil)...r|eturn;..|
|00002490| 09 09 0d 09 2f 2f 20 20 | 47 65 74 20 74 68 65 20 |....//  |Get the |
|000024a0| 6d 61 78 69 6d 75 6d 20 | 73 69 7a 65 20 6f 66 20 |maximum |size of |
|000024b0| 74 68 65 20 77 69 6e 64 | 6f 77 2c 20 61 6e 64 20 |the wind|ow, and |
|000024c0| 73 65 74 20 75 70 20 74 | 68 65 20 77 69 6e 64 6f |set up t|he windo|
|000024d0| 77 20 66 6f 72 20 74 68 | 65 20 7a 6f 6f 6d 20 0d |w for th|e zoom .|
|000024e0| 09 77 6f 72 6c 64 52 65 | 63 74 2e 72 69 67 68 74 |.worldRe|ct.right|
|000024f0| 20 3d 20 20 28 2a 64 6f | 63 29 2d 3e 63 6f 6e 74 | =  (*do|c)->cont|
|00002500| 65 6e 74 53 69 7a 65 2e | 68 3b 20 2f 2f 20 20 74 |entSize.|h; //  t|
|00002510| 6f 70 20 6c 65 66 74 20 | 69 73 20 61 6c 77 61 79 |op left |is alway|
|00002520| 73 20 30 2c 20 30 20 0d | 09 77 6f 72 6c 64 52 65 |s 0, 0 .|.worldRe|
|00002530| 63 74 2e 62 6f 74 74 6f | 6d 20 3d 20 20 28 2a 64 |ct.botto|m =  (*d|
|00002540| 6f 63 29 2d 3e 63 6f 6e | 74 65 6e 74 53 69 7a 65 |oc)->con|tentSize|
|00002550| 2e 76 3b 0d 09 52 65 61 | 64 79 57 5a 6f 6f 6d 28 |.v;..Rea|dyWZoom(|
|00002560| 77 69 6e 64 2c 20 7a 6f | 6f 6d 44 69 72 2c 20 77 |wind, zo|omDir, w|
|00002570| 6f 72 6c 64 52 65 63 74 | 2e 72 69 67 68 74 20 2b |orldRect|.right +|
|00002580| 20 6b 53 63 72 6f 6c 6c | 41 64 6a 75 73 74 2c 20 | kScroll|Adjust, |
|00002590| 77 6f 72 6c 64 52 65 63 | 74 2e 62 6f 74 74 6f 6d |worldRec|t.bottom|
|000025a0| 20 2b 20 6b 53 63 72 6f | 6c 6c 41 64 6a 75 73 74 | + kScro|llAdjust|
|000025b0| 29 3b 0d 09 0d 09 2f 2a | 20 4f 6b 2c 20 7a 6f 6f |);..../*| Ok, zoo|
|000025c0| 6d 20 74 68 61 74 20 73 | 75 63 6b 65 72 2e 20 45 |m that s|ucker. E|
|000025d0| 72 61 73 65 20 74 68 65 | 20 77 69 6e 64 6f 77 20 |rase the| window |
|000025e0| 63 6f 6d 70 6c 65 74 65 | 6c 79 20 66 69 72 73 74 |complete|ly first|
|000025f0| 3a 20 63 6f 73 6d 65 74 | 69 63 61 6c 6c 79 20 74 |: cosmet|ically t|
|00002600| 68 69 73 20 6c 6f 6f 6b | 73 0d 09 09 67 6f 6f 64 |his look|s...good|
|00002610| 20 2a 2f 0d 09 53 65 74 | 50 6f 72 74 28 77 69 6e | */..Set|Port(win|
|00002620| 64 29 3b 0d 09 45 72 61 | 73 65 52 65 63 74 28 26 |d);..Era|seRect(&|
|00002630| 77 69 6e 64 2d 3e 70 6f | 72 74 52 65 63 74 29 3b |wind->po|rtRect);|
|00002640| 0d 09 5a 6f 6f 6d 57 69 | 6e 64 6f 77 28 77 69 6e |..ZoomWi|ndow(win|
|00002650| 64 2c 20 7a 6f 6f 6d 44 | 69 72 2c 20 74 72 75 65 |d, zoomD|ir, true|
|00002660| 29 3b 0d 09 43 6c 69 70 | 52 65 63 74 28 26 77 69 |);..Clip|Rect(&wi|
|00002670| 6e 64 2d 3e 70 6f 72 74 | 52 65 63 74 29 3b 0d 0d |nd->port|Rect);..|
|00002680| 09 2f 2f 20 52 65 73 65 | 74 20 67 78 20 63 6c 69 |.// Rese|t gx cli|
|00002690| 70 20 0d 09 52 65 73 65 | 74 47 58 43 6c 69 70 28 |p ..Rese|tGXClip(|
|000026a0| 77 69 6e 64 29 3b 0d 0d | 09 2f 2f 20 49 66 20 77 |wind);..|.// If w|
|000026b0| 69 6e 64 6f 77 20 69 73 | 20 69 6e 20 66 72 6f 6d |indow is| in from|
|000026c0| 74 2c 20 72 65 73 65 74 | 20 73 63 72 6f 6c 6c 20 |t, reset| scroll |
|000026d0| 62 61 72 73 2c 20 65 74 | 63 2c 20 68 69 64 69 6e |bars, et|c, hidin|
|000026e0| 67 20 74 68 65 6d 20 66 | 69 72 73 74 0d 09 2f 2f |g them f|irst..//|
|000026f0| 20 74 6f 20 61 76 6f 69 | 64 20 75 6e 6e 65 63 65 | to avoi|d unnece|
|00002700| 73 73 61 72 79 20 64 72 | 61 77 69 6e 67 2e 0d 09 |ssary dr|awing...|
|00002710| 69 66 28 46 72 6f 6e 74 | 57 69 6e 64 6f 77 28 29 |if(Front|Window()|
|00002720| 20 3d 3d 20 77 69 6e 64 | 29 0d 09 7b 0d 09 09 48 | == wind|)..{...H|
|00002730| 69 64 65 43 6f 6e 74 72 | 6f 6c 28 28 2a 64 6f 63 |ideContr|ol((*doc|
|00002740| 29 2d 3e 68 53 63 72 6f | 6c 6c 29 3b 0d 09 09 48 |)->hScro|ll);...H|
|00002750| 69 64 65 43 6f 6e 74 72 | 6f 6c 28 28 2a 64 6f 63 |ideContr|ol((*doc|
|00002760| 29 2d 3e 76 53 63 72 6f | 6c 6c 29 3b 0d 09 09 41 |)->vScro|ll);...A|
|00002770| 64 6a 75 73 74 53 63 72 | 6f 6c 6c 62 61 72 73 28 |djustScr|ollbars(|
|00002780| 77 69 6e 64 2c 20 74 72 | 75 65 29 3b 0d 09 09 53 |wind, tr|ue);...S|
|00002790| 68 6f 77 43 6f 6e 74 72 | 6f 6c 28 28 2a 64 6f 63 |howContr|ol((*doc|
|000027a0| 29 2d 3e 68 53 63 72 6f | 6c 6c 29 3b 0d 09 09 53 |)->hScro|ll);...S|
|000027b0| 68 6f 77 43 6f 6e 74 72 | 6f 6c 28 28 2a 64 6f 63 |howContr|ol((*doc|
|000027c0| 29 2d 3e 76 53 63 72 6f | 6c 6c 29 3b 0d 09 09 44 |)->vScro|ll);...D|
|000027d0| 72 61 77 47 72 6f 77 49 | 63 6f 6e 28 77 69 6e 64 |rawGrowI|con(wind|
|000027e0| 29 3b 0d 09 7d 0d 0d 09 | 2f 2f 20 54 65 6c 6c 20 |);..}...|// Tell |
|000027f0| 74 68 65 20 41 70 70 20 | 77 68 61 74 20 68 61 70 |the App |what hap|
|00002800| 70 65 6e 65 64 0d 09 41 | 70 70 5a 6f 6f 6d 57 69 |pened..A|ppZoomWi|
|00002810| 6e 64 6f 77 28 77 69 6e | 64 2c 20 7a 6f 6f 6d 44 |ndow(win|d, zoomD|
|00002820| 69 72 29 3b 0d 7d 0d 0d | 2f 2a 2d 2d 2d 2d 2d 2d |ir);.}..|/*------|
|00002830| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002840| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002850| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002860| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002870| 2d 0d 44 6f 4b 65 79 28 | 29 09 09 09 48 61 6e 64 |-.DoKey(|)...Hand|
|00002880| 6c 65 73 20 6b 65 79 70 | 72 65 73 73 65 73 2e 2e |les keyp|resses..|
|00002890| 2e 0d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..------|--------|
|000028a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000028b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000028c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000028d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2a 2f 0d 0d 76 6f |--------|--*/..vo|
|000028e0| 69 64 20 44 6f 4b 65 79 | 28 45 76 65 6e 74 52 65 |id DoKey|(EventRe|
|000028f0| 63 6f 72 64 20 2a 65 76 | 65 6e 74 70 74 72 29 0d |cord *ev|entptr).|
|00002900| 7b 0d 09 63 68 61 72 09 | 6b 65 79 3b 0d 09 0d 09 |{..char.|key;....|
|00002910| 6b 65 79 20 3d 20 28 63 | 68 61 72 29 28 65 76 65 |key = (c|har)(eve|
|00002920| 6e 74 70 74 72 2d 3e 6d | 65 73 73 61 67 65 29 3b |ntptr->m|essage);|
|00002930| 0d 09 69 66 28 65 76 65 | 6e 74 70 74 72 2d 3e 6d |..if(eve|ntptr->m|
|00002940| 6f 64 69 66 69 65 72 73 | 20 26 20 63 6d 64 4b 65 |odifiers| & cmdKe|
|00002950| 79 29 0d 09 7b 0d 09 09 | 41 70 70 41 64 6a 75 73 |y)..{...|AppAdjus|
|00002960| 74 4d 65 6e 75 73 28 29 | 3b 0d 09 09 44 6f 4d 65 |tMenus()|;...DoMe|
|00002970| 6e 75 73 28 4d 65 6e 75 | 4b 65 79 28 6b 65 79 29 |nus(Menu|Key(key)|
|00002980| 29 3b 0d 09 7d 0d 7d 0d | 09 0d 2f 2a 2d 2d 2d 2d |);..}.}.|../*----|
|00002990| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000029a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000029b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000029c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000029d0| 2d 2d 2d 0d 44 6f 4f 53 | 28 29 09 48 61 6e 64 6c |---.DoOS|().Handl|
|000029e0| 65 73 20 73 75 73 70 65 | 6e 64 20 61 6e 64 20 72 |es suspe|nd and r|
|000029f0| 65 73 75 6d 65 20 65 76 | 65 6e 74 73 2c 20 69 67 |esume ev|ents, ig|
|00002a00| 6e 6f 72 65 73 20 6d 6f | 75 73 65 20 6d 6f 76 65 |nores mo|use move|
|00002a10| 64 20 65 76 65 6e 74 73 | 0d 2d 2d 2d 2d 2d 2d 2d |d events|.-------|
|00002a20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002a30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002a40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002a50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002a60| 2d 2a 2f 0d 0d 76 6f 69 | 64 20 44 6f 4f 53 28 45 |-*/..voi|d DoOS(E|
|00002a70| 76 65 6e 74 52 65 63 6f | 72 64 20 2a 65 76 65 6e |ventReco|rd *even|
|00002a80| 74 50 74 72 29 0d 7b 0d | 09 2f 2f 20 47 65 74 20 |tPtr).{.|.// Get |
|00002a90| 74 68 65 20 68 69 67 68 | 20 62 79 74 65 20 6f 66 |the high| byte of|
|00002aa0| 20 74 68 65 20 6d 65 73 | 73 61 67 65 2e 0d 09 73 | the mes|sage...s|
|00002ab0| 77 69 74 63 68 20 28 28 | 65 76 65 6e 74 50 74 72 |witch ((|eventPtr|
|00002ac0| 2d 3e 6d 65 73 73 61 67 | 65 20 3e 3e 20 32 34 29 |->messag|e >> 24)|
|00002ad0| 20 26 20 30 78 30 46 46 | 29 0d 09 7b 0d 09 09 63 | & 0x0FF|)..{...c|
|00002ae0| 61 73 65 20 73 75 73 70 | 65 6e 64 52 65 73 75 6d |ase susp|endResum|
|00002af0| 65 4d 65 73 73 61 67 65 | 3a 0d 09 09 09 7b 0d 09 |eMessage|:....{..|
|00002b00| 09 09 09 42 6f 6f 6c 65 | 61 6e 09 09 72 65 73 75 |...Boole|an..resu|
|00002b10| 6d 69 6e 67 20 3d 20 65 | 76 65 6e 74 50 74 72 2d |ming = e|ventPtr-|
|00002b20| 3e 6d 65 73 73 61 67 65 | 20 26 20 72 65 73 75 6d |>message| & resum|
|00002b30| 65 46 6c 61 67 3b 0d 09 | 09 09 09 57 69 6e 64 6f |eFlag;..|...Windo|
|00002b40| 77 50 74 72 09 77 69 6e | 64 6f 77 3b 0d 09 0d 09 |wPtr.win|dow;....|
|00002b50| 09 09 09 69 66 28 72 65 | 73 75 6d 69 6e 67 29 09 |...if(re|suming).|
|00002b60| 09 09 2f 2f 20 69 66 20 | 72 65 73 75 6d 65 20 65 |..// if |resume e|
|00002b70| 76 65 6e 74 0d 09 09 09 | 09 7b 09 09 09 09 09 09 |vent....|.{......|
|00002b80| 09 09 09 09 09 2f 2f 20 | 77 65 27 72 65 20 73 77 |.....// |we're sw|
|00002b90| 69 74 63 68 69 6e 67 20 | 62 61 63 6b 20 66 72 6f |itching |back fro|
|00002ba0| 6d 20 61 6e 6f 74 68 65 | 72 20 61 70 70 20 73 6f |m anothe|r app so|
|00002bb0| 2e 2e 0d 09 09 09 09 09 | 67 53 6c 65 65 70 54 69 |........|gSleepTi|
|00002bc0| 6d 65 20 3d 20 30 3b 09 | 09 09 09 09 09 09 09 2f |me = 0;.|......./|
|00002bd0| 2f 20 73 70 65 65 64 20 | 75 70 20 20 0d 09 0d 09 |/ speed |up  ....|
|00002be0| 09 09 09 09 2f 2f 20 4f | 6e 20 61 20 72 65 73 75 |....// O|n a resu|
|00002bf0| 6d 65 20 65 76 65 6e 74 | 2c 20 77 65 20 6e 65 65 |me event|, we nee|
|00002c00| 64 20 74 6f 20 63 61 6c | 6c 20 47 58 55 70 64 61 |d to cal|l GXUpda|
|00002c10| 74 65 4a 6f 62 20 6f 6e | 20 61 6c 6c 20 6f 66 20 |teJob on| all of |
|00002c20| 6f 75 72 0d 09 09 09 09 | 09 2f 2f 20 64 6f 63 75 |our.....|.// docu|
|00002c30| 6d 65 6e 74 73 27 20 6a | 6f 62 73 2e 20 20 54 68 |ments' j|obs.  Th|
|00002c40| 69 73 20 69 73 20 69 6d | 70 6f 72 74 61 6e 74 20 |is is im|portant |
|00002c50| 62 65 63 61 75 73 65 20 | 74 68 65 20 75 73 65 72 |because |the user|
|00002c60| 20 6d 61 79 20 68 61 76 | 65 0d 09 09 09 09 09 2f | may hav|e....../|
|00002c70| 2f 20 6a 75 73 74 20 63 | 68 61 6e 67 65 64 20 73 |/ just c|hanged s|
|00002c80| 6f 6d 65 74 68 69 6e 67 | 20 77 68 69 63 68 20 61 |omething| which a|
|00002c90| 66 66 65 63 74 73 20 6f | 75 72 20 6a 6f 62 73 20 |ffects o|ur jobs |
|00002ca0| 28 6c 69 6b 65 20 74 68 | 65 20 73 69 7a 65 0d 09 |(like th|e size..|
|00002cb0| 09 09 09 09 2f 2f 20 6f | 66 20 74 68 65 20 70 61 |....// o|f the pa|
|00002cc0| 70 65 72 20 69 6e 20 74 | 68 65 20 70 72 69 6e 74 |per in t|he print|
|00002cd0| 65 72 29 2e 0d 09 09 09 | 09 09 2f 2f 0d 09 09 09 |er).....|..//....|
|00002ce0| 09 09 2f 2f 20 53 69 6e | 63 65 20 6f 75 72 20 61 |..// Sin|ce our a|
|00002cf0| 70 70 6c 69 63 61 74 69 | 6f 6e 20 73 74 6f 72 65 |pplicati|on store|
|00002d00| 73 20 6f 75 72 20 64 6f | 63 75 6d 65 6e 74 20 72 |s our do|cument r|
|00002d10| 65 66 65 72 65 6e 63 65 | 73 20 69 6e 20 74 68 65 |eference|s in the|
|00002d20| 20 72 65 66 43 6f 6e 20 | 66 69 65 6c 64 73 0d 09 | refCon |fields..|
|00002d30| 09 09 09 09 2f 2f 20 6f | 66 20 6f 75 72 20 64 6f |....// o|f our do|
|00002d40| 63 75 6d 65 6e 74 73 27 | 20 77 69 6e 64 6f 77 73 |cuments'| windows|
|00002d50| 2c 20 77 65 20 6a 75 73 | 74 20 6c 6f 6f 70 20 74 |, we jus|t loop t|
|00002d60| 68 72 6f 75 67 68 20 65 | 76 65 72 79 20 6f 6e 65 |hrough e|very one|
|00002d70| 20 6f 66 20 6f 75 72 20 | 77 69 6e 64 6f 77 73 2c | of our |windows,|
|00002d80| 0d 09 09 09 09 09 2f 2f | 20 65 78 74 72 61 63 74 |......//| extract|
|00002d90| 20 6f 75 72 20 64 6f 63 | 75 6d 65 6e 74 20 70 6f | our doc|ument po|
|00002da0| 69 6e 74 65 72 73 20 61 | 6e 64 20 75 70 64 61 74 |inters a|nd updat|
|00002db0| 65 20 74 68 65 20 61 73 | 73 6f 63 69 61 74 65 64 |e the as|sociated|
|00002dc0| 20 6a 6f 62 73 2e 0d 09 | 09 0d 09 09 09 09 09 77 | jobs...|.......w|
|00002dd0| 69 6e 64 6f 77 20 3d 20 | 46 72 6f 6e 74 57 69 6e |indow = |FrontWin|
|00002de0| 64 6f 77 28 29 3b 0d 09 | 09 09 09 09 77 68 69 6c |dow();..|....whil|
|00002df0| 65 20 28 77 69 6e 64 6f | 77 20 21 3d 20 6e 69 6c |e (windo|w != nil|
|00002e00| 29 0d 09 09 09 09 09 7b | 0d 09 09 09 09 09 09 69 |)......{|.......i|
|00002e10| 66 20 28 20 49 73 41 70 | 70 57 69 6e 64 6f 77 28 |f ( IsAp|pWindow(|
|00002e20| 77 69 6e 64 6f 77 29 20 | 29 0d 09 09 09 09 09 09 |window) |).......|
|00002e30| 09 47 58 55 70 64 61 74 | 65 4a 6f 62 28 47 65 74 |.GXUpdat|eJob(Get|
|00002e40| 57 69 6e 64 6f 77 47 58 | 4a 6f 62 28 77 69 6e 64 |WindowGX|Job(wind|
|00002e50| 6f 77 29 29 3b 0d 09 09 | 09 09 09 09 77 69 6e 64 |ow));...|....wind|
|00002e60| 6f 77 20 3d 20 28 57 69 | 6e 64 6f 77 50 74 72 29 |ow = (Wi|ndowPtr)|
|00002e70| 20 28 28 57 69 6e 64 6f | 77 50 65 65 6b 29 20 77 | ((Windo|wPeek) w|
|00002e80| 69 6e 64 6f 77 29 2d 3e | 6e 65 78 74 57 69 6e 64 |indow)->|nextWind|
|00002e90| 6f 77 3b 0d 09 09 09 09 | 09 7d 0d 09 09 09 09 7d |ow;.....|.}.....}|
|00002ea0| 0d 09 09 09 09 65 6c 73 | 65 09 09 09 09 09 09 09 |.....els|e.......|
|00002eb0| 2f 2f 20 69 66 20 73 75 | 73 70 65 6e 64 20 65 76 |// if su|spend ev|
|00002ec0| 65 6e 74 0d 09 09 09 09 | 09 67 53 6c 65 65 70 54 |ent.....|.gSleepT|
|00002ed0| 69 6d 65 3d 38 30 3b 09 | 09 09 09 09 2f 2f 20 77 |ime=80;.|....// w|
|00002ee0| 65 27 72 65 20 73 77 69 | 74 63 68 69 6e 67 20 74 |e're swi|tching t|
|00002ef0| 6f 20 61 6e 6f 74 68 65 | 72 20 61 70 70 20 73 6f |o anothe|r app so|
|00002f00| 20 73 6c 6f 77 20 64 6f | 77 6e 2e 2e 2e 0d 09 09 | slow do|wn......|
|00002f10| 09 09 0d 09 09 09 09 2f | 2f 20 53 69 6e 63 65 20 |......./|/ Since |
|00002f20| 49 20 73 65 74 20 74 68 | 65 20 64 6f 65 73 41 63 |I set th|e doesAc|
|00002f30| 74 69 76 61 74 65 4f 6e | 46 47 53 77 69 74 63 68 |tivateOn|FGSwitch|
|00002f40| 20 66 6c 61 67 20 69 6e | 20 74 68 65 20 53 49 5a | flag in| the SIZ|
|00002f50| 45 20 72 65 73 6f 75 72 | 63 65 2c 20 49 20 6e 65 |E resour|ce, I ne|
|00002f60| 65 64 20 74 6f 0d 09 09 | 09 09 2f 2f 20 61 63 74 |ed to...|..// act|
|00002f70| 69 76 61 74 65 20 74 68 | 65 20 66 72 6f 6e 74 20 |ivate th|e front |
|00002f80| 77 69 6e 64 6f 77 20 74 | 6f 6f 2e 0d 09 09 09 09 |window t|oo......|
|00002f90| 44 6f 41 63 74 69 76 61 | 74 65 28 46 72 6f 6e 74 |DoActiva|te(Front|
|00002fa0| 57 69 6e 64 6f 77 28 29 | 2c 20 72 65 73 75 6d 69 |Window()|, resumi|
|00002fb0| 6e 67 29 3b 0d 09 09 09 | 7d 0d 09 09 09 62 72 65 |ng);....|}....bre|
|00002fc0| 61 6b 3b 0d 0d 09 09 63 | 61 73 65 20 6d 6f 75 73 |ak;....c|ase mous|
|00002fd0| 65 4d 6f 76 65 64 4d 65 | 73 73 61 67 65 3a 0d 09 |eMovedMe|ssage:..|
|00002fe0| 09 09 62 72 65 61 6b 3b | 0d 09 7d 0d 7d 0d 09 0d |..break;|..}.}...|
|00002ff0| 0d 2f 2a 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |./*-----|--------|
|00003000| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003010| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 44 6f 48 69 67 |--------|--.DoHig|
|00003040| 68 4c 65 76 65 6c 28 29 | 09 48 61 6e 64 6c 65 73 |hLevel()|.Handles|
|00003050| 20 20 68 69 67 68 20 6c | 65 76 65 6c 20 65 76 65 |  high l|evel eve|
|00003060| 6e 74 73 20 28 69 6e 63 | 6c 75 64 69 6e 67 20 41 |nts (inc|luding A|
|00003070| 70 70 6c 65 20 45 76 65 | 6e 74 73 29 0d 2d 2d 2d |pple Eve|nts).---|
|00003080| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000030a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000030b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000030c0| 2d 2d 2d 2d 2d 2a 2f 0d | 0d 76 6f 69 64 20 44 6f |-----*/.|.void Do|
|000030d0| 48 69 67 68 4c 65 76 65 | 6c 28 45 76 65 6e 74 52 |HighLeve|l(EventR|
|000030e0| 65 63 6f 72 64 20 2a 65 | 76 65 6e 74 50 74 72 29 |ecord *e|ventPtr)|
|000030f0| 0d 7b 0d 09 4f 53 45 72 | 72 09 09 65 72 72 3b 0d |.{..OSEr|r..err;.|
|00003100| 09 0d 09 2f 2f 20 41 73 | 73 75 6d 65 20 69 74 27 |...// As|sume it'|
|00003110| 73 20 61 6e 20 41 70 70 | 6c 65 20 45 76 65 6e 74 |s an App|le Event|
|00003120| 2c 20 73 69 6e 63 65 20 | 77 65 20 64 6f 6e 27 74 |, since |we don't|
|00003130| 20 64 65 66 69 6e 65 20 | 61 6e 79 20 6f 74 68 65 | define |any othe|
|00003140| 72 73 0d 09 65 72 72 20 | 3d 20 41 45 50 72 6f 63 |rs..err |= AEProc|
|00003150| 65 73 73 41 70 70 6c 65 | 45 76 65 6e 74 28 65 76 |essApple|Event(ev|
|00003160| 65 6e 74 50 74 72 29 3b | 0d 09 69 66 28 65 72 72 |entPtr);|..if(err|
|00003170| 20 21 3d 20 6e 6f 45 72 | 72 29 0d 09 09 53 79 73 | != noEr|r)...Sys|
|00003180| 42 65 65 70 28 31 30 29 | 3b 0d 7d 0d 09 0d 0d 2f |Beep(10)|;.}..../|
|00003190| 2a 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |*-------|--------|
|000031a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000031b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000031c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000031d0| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 44 6f 4d 65 6e 75 73 |--------|.DoMenus|
|000031e0| 28 29 09 09 09 48 61 6e | 64 6c 65 73 20 61 20 6d |()...Han|dles a m|
|000031f0| 65 6e 75 20 73 65 6c 65 | 63 74 69 6f 6e 2e 2e 2e |enu sele|ction...|
|00003200| 0d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|00003210| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003220| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003230| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003240| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2a 2f 0d 0d 76 6f 69 |--------|-*/..voi|
|00003250| 64 20 44 6f 4d 65 6e 75 | 73 28 6c 6f 6e 67 20 6d |d DoMenu|s(long m|
|00003260| 73 74 75 66 66 29 0d 7b | 0d 09 73 68 6f 72 74 09 |stuff).{|..short.|
|00003270| 09 09 69 64 2c 20 69 74 | 65 6d 3b 0d 09 0d 09 69 |..id, it|em;....i|
|00003280| 66 28 48 69 57 6f 72 64 | 28 6d 73 74 75 66 66 29 |f(HiWord|(mstuff)|
|00003290| 20 3d 3d 20 30 29 0d 09 | 09 72 65 74 75 72 6e 3b | == 0)..|.return;|
|000032a0| 0d 0d 09 69 64 20 3d 20 | 48 69 57 6f 72 64 28 6d |...id = |HiWord(m|
|000032b0| 73 74 75 66 66 29 3b 0d | 09 69 74 65 6d 20 3d 20 |stuff);.|.item = |
|000032c0| 4c 6f 57 6f 72 64 28 6d | 73 74 75 66 66 29 3b 0d |LoWord(m|stuff);.|
|000032d0| 09 73 77 69 74 63 68 28 | 69 64 29 0d 09 7b 0d 09 |.switch(|id)..{..|
|000032e0| 09 63 61 73 65 20 6b 41 | 70 70 6c 65 4d 65 6e 75 |.case kA|ppleMenu|
|000032f0| 49 44 3a 0d 09 09 09 44 | 6f 41 70 70 6c 65 28 69 |ID:....D|oApple(i|
|00003300| 74 65 6d 29 3b 0d 09 09 | 09 62 72 65 61 6b 3b 0d |tem);...|.break;.|
|00003310| 09 09 09 0d 09 09 63 61 | 73 65 20 6b 46 69 6c 65 |......ca|se kFile|
|00003320| 4d 65 6e 75 49 44 3a 0d | 09 09 09 44 6f 46 69 6c |MenuID:.|...DoFil|
|00003330| 65 28 69 74 65 6d 29 3b | 0d 09 09 09 62 72 65 61 |e(item);|....brea|
|00003340| 6b 3b 0d 0d 09 09 63 61 | 73 65 20 6b 45 64 69 74 |k;....ca|se kEdit|
|00003350| 4d 65 6e 75 49 44 3a 0d | 09 09 09 44 6f 45 64 69 |MenuID:.|...DoEdi|
|00003360| 74 28 69 74 65 6d 29 3b | 0d 09 09 09 62 72 65 61 |t(item);|....brea|
|00003370| 6b 3b 0d 0d 09 09 64 65 | 66 61 75 6c 74 3a 0d 09 |k;....de|fault:..|
|00003380| 09 09 41 70 70 4d 65 6e | 75 28 69 64 2c 20 69 74 |..AppMen|u(id, it|
|00003390| 65 6d 29 3b 0d 09 09 09 | 62 72 65 61 6b 3b 0d 09 |em);....|break;..|
|000033a0| 7d 0d 09 48 69 6c 69 74 | 65 4d 65 6e 75 28 30 29 |}..Hilit|eMenu(0)|
|000033b0| 3b 0d 7d 0d 0d 2f 2a 2d | 2d 2d 2d 2d 2d 2d 2d 2d |;.}../*-|--------|
|000033c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000033d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000033e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000033f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 44 |--------|------.D|
|00003400| 6f 41 70 70 6c 65 28 29 | 09 09 09 48 61 6e 64 6c |oApple()|...Handl|
|00003410| 65 73 20 61 70 70 6c 65 | 20 6d 65 6e 75 2e 2e 2e |es apple| menu...|
|00003420| 0d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|00003430| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003440| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003450| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003460| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2a 2f 0d 0d 76 6f 69 |--------|-*/..voi|
|00003470| 64 20 44 6f 41 70 70 6c | 65 28 73 68 6f 72 74 20 |d DoAppl|e(short |
|00003480| 69 74 65 6d 29 0d 7b 0d | 09 53 74 72 32 35 35 09 |item).{.|.Str255.|
|00003490| 09 09 09 6e 61 6d 65 3b | 0d 0d 09 73 77 69 74 63 |...name;|...switc|
|000034a0| 68 28 69 74 65 6d 29 0d | 09 7b 0d 09 09 63 61 73 |h(item).|.{...cas|
|000034b0| 65 20 69 41 62 6f 75 74 | 3a 0d 09 09 09 41 6c 65 |e iAbout|:....Ale|
|000034c0| 72 74 28 6b 41 62 6f 75 | 74 41 6c 65 72 74 49 44 |rt(kAbou|tAlertID|
|000034d0| 2c 20 6e 69 6c 29 3b 0d | 09 09 09 62 72 65 61 6b |, nil);.|...break|
|000034e0| 3b 0d 09 09 0d 09 09 64 | 65 66 61 75 6c 74 3a 0d |;......d|efault:.|
|000034f0| 09 09 09 47 65 74 49 74 | 65 6d 28 67 53 68 65 6c |...GetIt|em(gShel|
|00003500| 6c 4d 65 6e 75 48 61 6e | 64 6c 65 73 5b 6b 41 70 |lMenuHan|dles[kAp|
|00003510| 70 6c 65 4d 65 6e 75 5d | 2c 20 69 74 65 6d 2c 20 |pleMenu]|, item, |
|00003520| 6e 61 6d 65 29 3b 0d 09 | 09 09 4f 70 65 6e 44 65 |name);..|..OpenDe|
|00003530| 73 6b 41 63 63 28 6e 61 | 6d 65 29 3b 0d 09 7d 0d |skAcc(na|me);..}.|
|00003540| 7d 0d 09 09 09 0d 2f 2a | 2d 2d 2d 2d 2d 2d 2d 2d |}...../*|--------|
|00003550| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003560| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003570| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003580| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00003590| 44 6f 46 69 6c 65 28 29 | 09 09 09 48 61 6e 64 6c |DoFile()|...Handl|
|000035a0| 65 73 20 46 69 6c 65 20 | 6d 65 6e 75 2e 2e 2e 0d |es File |menu....|
|000035b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000035c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000035d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000035e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000035f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2a 2f 0d 09 0d 76 6f 69 |--------|*/...voi|
|00003600| 64 20 44 6f 46 69 6c 65 | 28 73 68 6f 72 74 20 69 |d DoFile|(short i|
|00003610| 74 65 6d 29 0d 7b 0d 09 | 57 69 6e 64 6f 77 50 74 |tem).{..|WindowPt|
|00003620| 72 09 77 69 6e 64 20 3d | 20 46 72 6f 6e 74 57 69 |r.wind =| FrontWi|
|00003630| 6e 64 6f 77 28 29 3b 0d | 09 0d 09 73 77 69 74 63 |ndow();.|...switc|
|00003640| 68 28 69 74 65 6d 29 0d | 09 7b 0d 09 09 63 61 73 |h(item).|.{...cas|
|00003650| 65 20 69 4e 65 77 3a 09 | 09 2f 2f 20 20 4e 65 77 |e iNew:.|.//  New|
|00003660| 2e 2e 2e 20 0d 09 09 09 | 41 70 70 4e 65 77 28 30 |... ....|AppNew(0|
|00003670| 2c 20 30 29 3b 0d 09 09 | 09 62 72 65 61 6b 3b 0d |, 0);...|.break;.|
|00003680| 09 09 09 09 09 09 0d 09 | 09 63 61 73 65 20 69 4f |........|.case iO|
|00003690| 70 65 6e 3a 20 20 20 2f | 2f 20 20 4f 70 65 6e 2e |pen:   /|/  Open.|
|000036a0| 2e 2e 20 20 0d 09 09 09 | 41 70 70 4f 70 65 6e 28 |..  ....|AppOpen(|
|000036b0| 29 3b 0d 09 09 09 62 72 | 65 61 6b 3b 0d 0d 09 09 |);....br|eak;....|
|000036c0| 63 61 73 65 20 69 43 6c | 6f 73 65 3a 20 20 20 2f |case iCl|ose:   /|
|000036d0| 2f 20 20 43 6c 6f 73 65 | 2e 2e 2e 20 20 0d 09 09 |/  Close|...  ...|
|000036e0| 09 44 6f 43 6c 6f 73 65 | 28 77 69 6e 64 29 3b 0d |.DoClose|(wind);.|
|000036f0| 09 09 09 62 72 65 61 6b | 3b 0d 0d 09 09 63 61 73 |...break|;....cas|
|00003700| 65 20 69 53 61 76 65 3a | 20 20 2f 2f 20 20 53 61 |e iSave:|  //  Sa|
|00003710| 76 65 2e 2e 2e 20 0d 09 | 09 09 41 70 70 53 61 76 |ve... ..|..AppSav|
|00003720| 65 28 77 69 6e 64 29 3b | 0d 09 09 09 62 72 65 61 |e(wind);|....brea|
|00003730| 6b 3b 0d 09 09 09 0d 09 | 09 63 61 73 65 20 69 53 |k;......|.case iS|
|00003740| 61 76 65 41 73 3a 20 20 | 2f 2f 20 20 53 61 76 65 |aveAs:  |//  Save|
|00003750| 20 41 73 2e 2e 2e 20 0d | 09 09 09 41 70 70 53 61 | As... .|...AppSa|
|00003760| 76 65 41 73 28 77 69 6e | 64 29 3b 0d 09 09 09 62 |veAs(win|d);....b|
|00003770| 72 65 61 6b 3b 0d 09 09 | 09 0d 09 09 63 61 73 65 |reak;...|....case|
|00003780| 20 69 50 61 67 65 53 65 | 74 75 70 3a 20 20 2f 2f | iPageSe|tup:  //|
|00003790| 20 20 50 61 67 65 20 53 | 65 74 75 70 2e 2e 2e 20 |  Page S|etup... |
|000037a0| 0d 09 09 09 41 70 70 50 | 61 67 65 53 65 74 75 70 |....AppP|ageSetup|
|000037b0| 28 77 69 6e 64 29 3b 0d | 09 09 09 62 72 65 61 6b |(wind);.|...break|
|000037c0| 3b 0d 09 09 09 0d 09 09 | 63 61 73 65 20 69 50 72 |;.......|case iPr|
|000037d0| 69 6e 74 3a 20 20 2f 2f | 20 20 50 72 69 6e 74 2e |int:  //|  Print.|
|000037e0| 2e 2e 20 0d 09 09 09 41 | 70 70 50 72 69 6e 74 28 |.. ....A|ppPrint(|
|000037f0| 77 69 6e 64 29 3b 0d 09 | 09 09 62 72 65 61 6b 3b |wind);..|..break;|
|00003800| 0d 09 09 09 0d 09 09 63 | 61 73 65 20 69 50 72 69 |.......c|ase iPri|
|00003810| 6e 74 4f 6e 65 3a 20 20 | 2f 2f 20 20 50 72 69 6e |ntOne:  |//  Prin|
|00003820| 74 2e 2e 2e 20 0d 09 09 | 09 41 70 70 50 72 69 6e |t... ...|.AppPrin|
|00003830| 74 4f 6e 65 28 77 69 6e | 64 29 3b 0d 09 09 09 62 |tOne(win|d);....b|
|00003840| 72 65 61 6b 3b 0d 09 09 | 09 0d 09 09 63 61 73 65 |reak;...|....case|
|00003850| 20 69 51 75 69 74 3a 20 | 20 2f 2f 20 20 51 75 69 | iQuit: | //  Qui|
|00003860| 74 20 0d 09 09 09 2f 2f | 20 49 66 20 74 68 65 20 |t ....//| If the |
|00003870| 75 73 65 72 20 63 61 6e | 63 65 6c 73 20 61 6e 79 |user can|cels any|
|00003880| 20 73 61 76 65 73 20 43 | 6c 6f 73 65 41 6c 6c 44 | saves C|loseAllD|
|00003890| 6f 63 73 20 72 65 74 75 | 72 6e 73 20 66 61 6c 73 |ocs retu|rns fals|
|000038a0| 65 2c 20 6f 74 68 65 72 | 77 69 73 65 20 69 74 20 |e, other|wise it |
|000038b0| 72 65 74 75 72 6e 73 20 | 74 72 75 65 0d 09 09 09 |returns |true....|
|000038c0| 67 44 6f 6e 65 46 6c 61 | 67 20 3d 20 43 6c 6f 73 |gDoneFla|g = Clos|
|000038d0| 65 41 6c 6c 44 6f 63 73 | 28 29 3b 0d 09 09 09 62 |eAllDocs|();....b|
|000038e0| 72 65 61 6b 3b 0d 09 7d | 0d 09 44 6f 41 64 6a 75 |reak;..}|..DoAdju|
|000038f0| 73 74 4d 65 6e 75 73 28 | 29 3b 20 2f 2f 20 4b 65 |stMenus(|); // Ke|
|00003900| 65 70 20 4d 65 6e 75 73 | 20 75 70 20 74 6f 20 64 |ep Menus| up to d|
|00003910| 61 74 65 0d 7d 0d 0d 2f | 2a 2d 2d 2d 2d 2d 2d 2d |ate.}../|*-------|
|00003920| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003930| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003940| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003950| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003960| 0d 76 6f 69 64 20 44 6f | 45 64 69 74 28 29 09 09 |.void Do|Edit()..|
|00003970| 09 48 61 6e 64 6c 65 73 | 20 45 64 69 74 20 6d 65 |.Handles| Edit me|
|00003980| 6e 75 2e 2e 2e 0d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |nu....--|--------|
|00003990| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000039a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000039b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000039c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2a 2f |--------|------*/|
|000039d0| 0d 09 0d 76 6f 69 64 20 | 44 6f 45 64 69 74 28 73 |...void |DoEdit(s|
|000039e0| 68 6f 72 74 20 69 74 65 | 6d 29 0d 7b 0d 09 2f 2a |hort ite|m).{../*|
|000039f0| 20 46 69 72 73 74 20 63 | 61 6c 6c 20 53 79 73 74 | First c|all Syst|
|00003a00| 65 6d 45 64 69 74 20 74 | 6f 20 6c 65 74 20 61 20 |emEdit t|o let a |
|00003a10| 44 41 20 64 6f 20 65 64 | 69 74 69 6e 67 2c 20 69 |DA do ed|iting, i|
|00003a20| 66 20 6f 6e 65 20 69 73 | 20 66 72 6f 6e 74 6d 6f |f one is| frontmo|
|00003a30| 73 74 2e 20 57 65 0d 09 | 09 70 61 73 73 20 69 74 |st. We..|.pass it|
|00003a40| 20 74 68 65 20 69 74 65 | 6d 20 2d 20 31 20 73 69 | the ite|m - 1 si|
|00003a50| 6e 63 65 20 74 68 65 20 | 63 6f 6e 73 74 61 6e 74 |nce the |constant|
|00003a60| 73 20 66 6f 72 20 74 68 | 65 20 65 64 69 74 20 63 |s for th|e edit c|
|00003a70| 6f 6d 6d 61 6e 64 73 20 | 61 72 65 20 7a 65 72 6f |ommands |are zero|
|00003a80| 2d 62 61 73 65 64 20 2a | 2f 0d 09 69 66 28 53 79 |-based *|/..if(Sy|
|00003a90| 73 74 65 6d 45 64 69 74 | 28 69 74 65 6d 20 2d 20 |stemEdit|(item - |
|00003aa0| 31 29 20 3d 3d 20 66 61 | 6c 73 65 29 0d 09 7b 0d |1) == fa|lse)..{.|
|00003ab0| 09 09 2f 2f 20 20 54 68 | 65 20 63 6f 6d 6d 61 6e |..//  Th|e comman|
|00003ac0| 64 20 69 73 20 66 6f 72 | 20 74 68 65 20 61 70 70 |d is for| the app|
|00003ad0| 20 73 69 6e 63 65 20 53 | 79 73 74 65 6d 45 64 69 | since S|ystemEdi|
|00003ae0| 74 20 64 69 64 6e 27 74 | 20 68 61 6e 64 6c 65 20 |t didn't| handle |
|00003af0| 69 74 2e 20 0d 09 09 73 | 77 69 74 63 68 28 69 74 |it. ...s|witch(it|
|00003b00| 65 6d 29 0d 09 09 7b 0d | 09 09 09 63 61 73 65 20 |em)...{.|...case |
|00003b10| 69 55 6e 64 6f 3a 0d 09 | 09 09 09 41 70 70 55 6e |iUndo:..|...AppUn|
|00003b20| 64 6f 28 29 3b 0d 09 09 | 09 09 62 72 65 61 6b 3b |do();...|..break;|
|00003b30| 0d 09 0d 09 09 09 63 61 | 73 65 20 69 43 75 74 3a |......ca|se iCut:|
|00003b40| 0d 09 09 09 09 41 70 70 | 43 75 74 28 29 3b 0d 09 |.....App|Cut();..|
|00003b50| 09 09 09 62 72 65 61 6b | 3b 0d 09 09 09 09 0d 09 |...break|;.......|
|00003b60| 09 09 63 61 73 65 20 69 | 43 6f 70 79 3a 0d 09 09 |..case i|Copy:...|
|00003b70| 09 09 41 70 70 43 6f 70 | 79 28 29 3b 0d 09 09 09 |..AppCop|y();....|
|00003b80| 09 62 72 65 61 6b 3b 0d | 09 0d 09 09 09 63 61 73 |.break;.|.....cas|
|00003b90| 65 20 69 50 61 73 74 65 | 3a 0d 09 09 09 09 41 70 |e iPaste|:.....Ap|
|00003ba0| 70 50 61 73 74 65 28 29 | 3b 0d 09 09 09 09 62 72 |pPaste()|;.....br|
|00003bb0| 65 61 6b 3b 0d 09 0d 09 | 09 09 63 61 73 65 20 69 |eak;....|..case i|
|00003bc0| 43 6c 65 61 72 3a 0d 09 | 09 09 09 41 70 70 43 6c |Clear:..|...AppCl|
|00003bd0| 65 61 72 28 29 3b 0d 09 | 09 09 09 62 72 65 61 6b |ear();..|...break|
|00003be0| 3b 0d 09 09 7d 0d 09 7d | 0d 7d 0d 0d 2f 2f 20 0d |;...}..}|.}..// .|
|00003bf0| 42 6f 6f 6c 65 61 6e 20 | 44 6f 43 6c 6f 73 65 28 |Boolean |DoClose(|
|00003c00| 57 69 6e 64 6f 77 50 74 | 72 20 77 69 6e 64 29 0d |WindowPt|r wind).|
|00003c10| 7b 0d 09 42 6f 6f 6c 65 | 61 6e 09 09 09 63 6c 6f |{..Boole|an...clo|
|00003c20| 73 65 49 74 20 3d 20 74 | 72 75 65 3b 0d 09 44 6f |seIt = t|rue;..Do|
|00003c30| 63 48 61 6e 64 6c 65 20 | 64 6f 63 3b 0d 09 0d 09 |cHandle |doc;....|
|00003c40| 64 6f 63 20 3d 20 47 65 | 74 57 69 6e 64 6f 77 44 |doc = Ge|tWindowD|
|00003c50| 6f 63 28 77 69 6e 64 29 | 3b 0d 09 69 66 28 64 6f |oc(wind)|;..if(do|
|00003c60| 63 20 21 3d 20 6e 69 6c | 29 0d 09 7b 0d 09 09 2f |c != nil|)..{.../|
|00003c70| 2f 20 20 49 66 20 69 74 | 20 6e 65 65 64 73 20 73 |/  If it| needs s|
|00003c80| 61 76 69 6e 67 2c 20 64 | 6f 20 74 68 65 20 64 69 |aving, d|o the di|
|00003c90| 61 6c 6f 67 20 0d 09 09 | 69 66 28 28 2a 64 6f 63 |alog ...|if((*doc|
|00003ca0| 29 2d 3e 64 69 72 74 79 | 29 0d 09 09 7b 0d 09 09 |)->dirty|)...{...|
|00003cb0| 09 73 68 6f 72 74 09 09 | 72 73 6c 74 3b 0d 09 09 |.short..|rslt;...|
|00003cc0| 09 0d 09 09 09 72 73 6c | 74 20 3d 20 53 61 76 65 |.....rsl|t = Save|
|00003cd0| 43 68 61 6e 67 65 73 44 | 6c 6f 67 28 29 3b 0d 09 |ChangesD|log();..|
|00003ce0| 09 09 73 77 69 74 63 68 | 28 72 73 6c 74 29 0d 09 |..switch|(rslt)..|
|00003cf0| 09 09 7b 0d 09 09 09 09 | 63 61 73 65 20 31 3a 09 |..{.....|case 1:.|
|00003d00| 2f 2f 20 20 53 61 76 65 | 20 0d 09 09 09 09 09 63 |//  Save| ......c|
|00003d10| 6c 6f 73 65 49 74 20 3d | 20 41 70 70 53 61 76 65 |loseIt =| AppSave|
|00003d20| 28 77 69 6e 64 29 3b 20 | 2f 2a 09 41 70 70 53 61 |(wind); |/*.AppSa|
|00003d30| 76 65 28 29 20 72 65 74 | 75 72 6e 73 20 74 72 75 |ve() ret|urns tru|
|00003d40| 65 20 6f 6e 6c 79 20 69 | 66 20 74 68 65 20 73 61 |e only i|f the sa|
|00003d50| 76 65 0d 09 09 09 09 09 | 09 09 09 09 09 09 09 63 |ve......|.......c|
|00003d60| 6f 6d 70 6c 65 74 65 64 | 20 73 75 63 63 65 73 73 |ompleted| success|
|00003d70| 66 75 6c 79 20 28 75 73 | 65 72 20 64 69 64 6e 27 |fuly (us|er didn'|
|00003d80| 74 20 63 61 6e 63 65 6c | 2c 0d 09 09 09 09 09 09 |t cancel|,.......|
|00003d90| 09 09 09 09 09 09 6e 6f | 20 65 72 72 6f 72 73 20 |......no| errors |
|00003da0| 2a 2f 0d 09 09 09 09 09 | 62 72 65 61 6b 3b 0d 09 |*/......|break;..|
|00003db0| 09 09 09 0d 09 09 09 09 | 63 61 73 65 20 34 3a 09 |........|case 4:.|
|00003dc0| 2f 2f 20 4e 6f 20 73 61 | 76 65 0d 09 09 09 09 09 |// No sa|ve......|
|00003dd0| 62 72 65 61 6b 3b 20 2f | 2f 20 63 6c 6f 73 65 49 |break; /|/ closeI|
|00003de0| 74 20 61 6c 72 65 61 64 | 79 20 74 72 75 65 2e 0d |t alread|y true..|
|00003df0| 09 09 09 09 0d 09 09 09 | 09 63 61 73 65 20 32 3a |........|.case 2:|
|00003e00| 09 2f 2f 20 20 43 61 6e | 63 65 6c 20 0d 09 09 09 |.//  Can|cel ....|
|00003e10| 09 09 63 6c 6f 73 65 49 | 74 20 3d 20 66 61 6c 73 |..closeI|t = fals|
|00003e20| 65 3b 0d 09 09 09 09 09 | 62 72 65 61 6b 3b 0d 09 |e;......|break;..|
|00003e30| 09 09 7d 0d 09 09 7d 0d | 09 0d 09 09 2f 2f 20 4b |..}...}.|....// K|
|00003e40| 69 6c 6c 20 74 68 65 20 | 77 69 6e 64 6f 77 2c 20 |ill the |window, |
|00003e50| 69 66 20 69 6e 64 69 63 | 61 74 65 64 0d 09 09 69 |if indic|ated...i|
|00003e60| 66 28 63 6c 6f 73 65 49 | 74 29 0d 09 09 7b 0d 09 |f(closeI|t)...{..|
|00003e70| 09 09 41 70 70 43 6c 6f | 73 65 28 77 69 6e 64 29 |..AppClo|se(wind)|
|00003e80| 3b 0d 09 09 7d 0d 09 7d | 0d 09 72 65 74 75 72 6e |;...}..}|..return|
|00003e90| 20 63 6c 6f 73 65 49 74 | 3b 0d 7d 0d 0d 2f 2a 20 | closeIt|;.}../* |
|00003ea0| 41 70 70 6c 65 20 45 76 | 65 6e 74 20 68 61 6e 64 |Apple Ev|ent hand|
|00003eb0| 6c 65 72 73 20 2a 2f 0d | 70 61 73 63 61 6c 20 4f |lers */.|pascal O|
|00003ec0| 53 45 72 72 20 4f 41 50 | 50 48 61 6e 64 6c 65 72 |SErr OAP|PHandler|
|00003ed0| 28 41 70 70 6c 65 45 76 | 65 6e 74 20 2a 74 68 65 |(AppleEv|ent *the|
|00003ee0| 41 45 76 65 6e 74 2c 20 | 41 70 70 6c 65 45 76 65 |AEvent, |AppleEve|
|00003ef0| 6e 74 20 2a 72 65 70 6c | 79 2c 20 6c 6f 6e 67 20 |nt *repl|y, long |
|00003f00| 72 65 66 63 6f 6e 29 0d | 7b 0d 09 4f 53 45 72 72 |refcon).|{..OSErr|
|00003f10| 09 65 72 72 3b 0d 09 0d | 09 65 72 72 20 3d 20 4d |.err;...|.err = M|
|00003f20| 79 47 6f 74 52 65 71 75 | 69 72 65 64 50 61 72 61 |yGotRequ|iredPara|
|00003f30| 6d 73 28 74 68 65 41 45 | 76 65 6e 74 29 3b 0d 09 |ms(theAE|vent);..|
|00003f40| 69 66 20 28 65 72 72 29 | 0d 09 09 72 65 74 75 72 |if (err)|...retur|
|00003f50| 6e 20 65 72 72 3b 0d 09 | 65 6c 73 65 20 7b 0d 09 |n err;..|else {..|
|00003f60| 09 2f 2f 20 44 6f 20 61 | 6e 79 74 68 69 6e 67 20 |.// Do a|nything |
|00003f70| 74 68 61 74 20 73 68 6f | 75 6c 64 20 68 61 70 70 |that sho|uld happ|
|00003f80| 65 6e 20 6f 6e 20 61 6e | 20 4f 70 65 6e 2e 0d 09 |en on an| Open...|
|00003f90| 09 43 75 72 73 48 61 6e | 64 6c 65 09 63 75 72 73 |.CursHan|dle.curs|
|00003fa0| 3b 0d 0d 09 09 2f 2f 20 | 53 65 74 20 63 75 72 73 |;....// |Set curs|
|00003fb0| 6f 72 20 74 6f 20 77 61 | 74 63 68 0d 09 09 63 75 |or to wa|tch...cu|
|00003fc0| 72 73 20 3d 20 47 65 74 | 43 75 72 73 6f 72 28 77 |rs = Get|Cursor(w|
|00003fd0| 61 74 63 68 43 75 72 73 | 6f 72 29 3b 0d 09 09 53 |atchCurs|or);...S|
|00003fe0| 65 74 43 75 72 73 6f 72 | 28 2a 63 75 72 73 29 3b |etCursor|(*curs);|
|00003ff0| 0d 09 09 0d 09 09 2f 2f | 20 4d 61 6b 65 20 61 20 |......//| Make a |
|00004000| 6e 65 77 20 64 6f 63 75 | 6d 65 6e 74 0d 09 09 2f |new docu|ment.../|
|00004010| 2f 20 41 70 70 4e 65 77 | 28 30 2c 20 30 29 3b 0d |/ AppNew|(0, 0);.|
|00004020| 09 09 0d 09 09 2f 2f 20 | 53 65 74 20 63 75 72 73 |.....// |Set curs|
|00004030| 6f 72 20 74 6f 20 61 72 | 72 6f 77 0d 09 09 53 65 |or to ar|row...Se|
|00004040| 74 43 75 72 73 6f 72 28 | 26 71 64 2e 61 72 72 6f |tCursor(|&qd.arro|
|00004050| 77 29 3b 0d 09 09 0d 09 | 09 72 65 74 75 72 6e 20 |w);.....|.return |
|00004060| 6e 6f 45 72 72 3b 0d 09 | 7d 0d 7d 0d 0d 70 61 73 |noErr;..|}.}..pas|
|00004070| 63 61 6c 20 4f 53 45 72 | 72 20 4f 44 4f 43 48 61 |cal OSEr|r ODOCHa|
|00004080| 6e 64 6c 65 72 28 41 70 | 70 6c 65 45 76 65 6e 74 |ndler(Ap|pleEvent|
|00004090| 20 2a 74 68 65 41 45 76 | 65 6e 74 2c 20 41 70 70 | *theAEv|ent, App|
|000040a0| 6c 65 45 76 65 6e 74 20 | 2a 72 65 70 6c 79 2c 20 |leEvent |*reply, |
|000040b0| 6c 6f 6e 67 20 72 65 66 | 63 6f 6e 29 0d 7b 0d 09 |long ref|con).{..|
|000040c0| 46 53 53 70 65 63 09 09 | 6d 79 46 53 53 3b 0d 09 |FSSpec..|myFSS;..|
|000040d0| 41 45 44 65 73 63 4c 69 | 73 74 09 64 6f 63 4c 69 |AEDescLi|st.docLi|
|000040e0| 73 74 3b 0d 09 4f 53 45 | 72 72 09 09 65 72 72 3b |st;..OSE|rr..err;|
|000040f0| 0d 09 6c 6f 6e 67 09 09 | 69 6e 64 65 78 2c 20 69 |..long..|index, i|
|00004100| 74 65 6d 73 49 6e 4c 69 | 73 74 3b 0d 09 53 69 7a |temsInLi|st;..Siz|
|00004110| 65 09 09 61 63 74 75 61 | 6c 53 69 7a 65 3b 0d 09 |e..actua|lSize;..|
|00004120| 41 45 4b 65 79 77 6f 72 | 64 09 6b 65 79 77 64 3b |AEKeywor|d.keywd;|
|00004130| 0d 09 44 65 73 63 54 79 | 70 65 09 72 65 74 75 72 |..DescTy|pe.retur|
|00004140| 6e 65 64 54 79 70 65 3b | 0d 0d 09 2f 2f 20 67 65 |nedType;|...// ge|
|00004150| 74 20 74 68 65 20 64 69 | 72 65 63 74 20 70 61 72 |t the di|rect par|
|00004160| 61 6d 65 74 65 72 2d 2d | 61 20 64 65 73 63 72 69 |ameter--|a descri|
|00004170| 70 74 6f 72 20 6c 69 73 | 74 2d 2d 61 6e 64 20 70 |ptor lis|t--and p|
|00004180| 75 74 0d 09 2f 2f 20 69 | 74 20 69 6e 74 6f 20 64 |ut..// i|t into d|
|00004190| 6f 63 4c 69 73 74 0d 09 | 65 72 72 20 3d 20 41 45 |ocList..|err = AE|
|000041a0| 47 65 74 50 61 72 61 6d | 44 65 73 63 28 74 68 65 |GetParam|Desc(the|
|000041b0| 41 45 76 65 6e 74 2c 20 | 6b 65 79 44 69 72 65 63 |AEvent, |keyDirec|
|000041c0| 74 4f 62 6a 65 63 74 2c | 0d 09 09 09 09 09 09 09 |tObject,|........|
|000041d0| 74 79 70 65 41 45 4c 69 | 73 74 2c 20 26 64 6f 63 |typeAELi|st, &doc|
|000041e0| 4c 69 73 74 29 3b 0d 09 | 69 66 20 28 65 72 72 29 |List);..|if (err)|
|000041f0| 0d 09 09 72 65 74 75 72 | 6e 20 65 72 72 3b 0d 0d |...retur|n err;..|
|00004200| 09 2f 2f 20 63 68 65 63 | 6b 20 66 6f 72 20 6d 69 |.// chec|k for mi|
|00004210| 73 73 69 6e 67 20 72 65 | 71 75 69 72 65 64 20 70 |ssing re|quired p|
|00004220| 61 72 61 6d 65 74 65 72 | 73 0d 09 65 72 72 20 3d |arameter|s..err =|
|00004230| 20 4d 79 47 6f 74 52 65 | 71 75 69 72 65 64 50 61 | MyGotRe|quiredPa|
|00004240| 72 61 6d 73 28 74 68 65 | 41 45 76 65 6e 74 29 3b |rams(the|AEvent);|
|00004250| 0d 09 69 66 20 28 65 72 | 72 29 20 7b 0d 09 09 2f |..if (er|r) {.../|
|00004260| 2f 20 61 6e 20 65 72 72 | 6f 72 20 6f 63 63 75 72 |/ an err|or occur|
|00004270| 72 65 64 3a 20 20 64 6f | 20 74 68 65 20 6e 65 63 |red:  do| the nec|
|00004280| 65 73 73 61 72 79 20 65 | 72 72 6f 72 20 68 61 6e |essary e|rror han|
|00004290| 64 6c 69 6e 67 0d 09 09 | 65 72 72 20 3d 20 41 45 |dling...|err = AE|
|000042a0| 44 69 73 70 6f 73 65 44 | 65 73 63 28 26 64 6f 63 |DisposeD|esc(&doc|
|000042b0| 4c 69 73 74 29 3b 0d 09 | 09 72 65 74 75 72 6e 09 |List);..|.return.|
|000042c0| 65 72 72 3b 0d 09 7d 0d | 09 0d 09 2f 2f 20 63 6f |err;..}.|...// co|
|000042d0| 75 6e 74 20 74 68 65 20 | 6e 75 6d 62 65 72 20 6f |unt the |number o|
|000042e0| 66 20 64 65 73 63 72 69 | 70 74 6f 72 20 72 65 63 |f descri|ptor rec|
|000042f0| 6f 72 64 73 20 69 6e 20 | 74 68 65 20 6c 69 73 74 |ords in |the list|
|00004300| 0d 09 65 72 72 20 3d 20 | 41 45 43 6f 75 6e 74 49 |..err = |AECountI|
|00004310| 74 65 6d 73 20 28 26 64 | 6f 63 4c 69 73 74 2c 20 |tems (&d|ocList, |
|00004320| 26 69 74 65 6d 73 49 6e | 4c 69 73 74 29 3b 0d 0d |&itemsIn|List);..|
|00004330| 09 2f 2f 20 6e 6f 77 20 | 67 65 74 20 65 61 63 68 |.// now |get each|
|00004340| 20 64 65 73 63 72 69 70 | 74 6f 72 20 72 65 63 6f | descrip|tor reco|
|00004350| 72 64 20 66 72 6f 6d 20 | 74 68 65 20 6c 69 73 74 |rd from |the list|
|00004360| 2c 20 63 6f 65 72 63 65 | 0d 09 2f 2f 20 74 68 65 |, coerce|..// the|
|00004370| 20 72 65 74 75 72 6e 65 | 64 20 64 61 74 61 20 74 | returne|d data t|
|00004380| 6f 20 61 6e 20 46 53 53 | 70 65 63 20 72 65 63 6f |o an FSS|pec reco|
|00004390| 72 64 2c 20 61 6e 64 20 | 6f 70 65 6e 20 74 68 65 |rd, and |open the|
|000043a0| 0d 09 2f 2f 20 61 73 73 | 6f 63 69 61 74 65 64 20 |..// ass|ociated |
|000043b0| 66 69 6c 65 0d 09 66 6f | 72 20 28 69 6e 64 65 78 |file..fo|r (index|
|000043c0| 20 3d 20 31 3b 20 69 6e | 64 65 78 20 3c 3d 20 69 | = 1; in|dex <= i|
|000043d0| 74 65 6d 73 49 6e 4c 69 | 73 74 3b 20 69 6e 64 65 |temsInLi|st; inde|
|000043e0| 78 2b 2b 29 0d 09 7b 0d | 09 09 65 72 72 20 3d 20 |x++)..{.|..err = |
|000043f0| 41 45 47 65 74 4e 74 68 | 50 74 72 28 26 64 6f 63 |AEGetNth|Ptr(&doc|
|00004400| 4c 69 73 74 2c 20 69 6e | 64 65 78 2c 20 74 79 70 |List, in|dex, typ|
|00004410| 65 46 53 53 2c 20 26 6b | 65 79 77 64 2c 0d 09 09 |eFSS, &k|eywd,...|
|00004420| 09 09 09 09 09 26 72 65 | 74 75 72 6e 65 64 54 79 |.....&re|turnedTy|
|00004430| 70 65 2c 20 28 50 74 72 | 29 26 6d 79 46 53 53 2c |pe, (Ptr|)&myFSS,|
|00004440| 0d 09 09 09 09 09 09 09 | 73 69 7a 65 6f 66 28 6d |........|sizeof(m|
|00004450| 79 46 53 53 29 2c 20 26 | 61 63 74 75 61 6c 53 69 |yFSS), &|actualSi|
|00004460| 7a 65 29 3b 0d 09 09 69 | 66 20 28 65 72 72 29 0d |ze);...i|f (err).|
|00004470| 09 09 09 53 79 73 42 65 | 65 70 28 31 30 29 3b 0d |...SysBe|ep(10);.|
|00004480| 09 09 0d 09 09 2f 2f 20 | 4f 70 65 6e 20 74 68 65 |.....// |Open the|
|00004490| 20 66 69 6c 65 0d 09 09 | 65 72 72 20 3d 20 4f 70 | file...|err = Op|
|000044a0| 65 6e 4a 75 67 67 6c 65 | 46 69 6c 65 28 26 6d 79 |enJuggle|File(&my|
|000044b0| 46 53 53 2c 20 6e 69 6c | 29 3b 0d 09 09 0d 09 09 |FSS, nil|);......|
|000044c0| 69 66 20 28 65 72 72 29 | 0d 09 09 09 53 79 73 42 |if (err)|....SysB|
|000044d0| 65 65 70 28 31 30 29 3b | 0d 09 7d 0d 0d 09 65 72 |eep(10);|..}...er|
|000044e0| 72 20 3d 20 41 45 44 69 | 73 70 6f 73 65 44 65 73 |r = AEDi|sposeDes|
|000044f0| 63 28 26 64 6f 63 4c 69 | 73 74 29 3b 0d 09 44 6f |c(&docLi|st);..Do|
|00004500| 41 64 6a 75 73 74 4d 65 | 6e 75 73 28 29 3b 0d 09 |AdjustMe|nus();..|
|00004510| 72 65 74 75 72 6e 09 6e | 6f 45 72 72 3b 0d 7d 0d |return.n|oErr;.}.|
|00004520| 0d 70 61 73 63 61 6c 20 | 4f 53 45 72 72 20 50 44 |.pascal |OSErr PD|
|00004530| 4f 43 48 61 6e 64 6c 65 | 72 28 41 70 70 6c 65 45 |OCHandle|r(AppleE|
|00004540| 76 65 6e 74 20 2a 74 68 | 65 41 45 76 65 6e 74 2c |vent *th|eAEvent,|
|00004550| 20 41 70 70 6c 65 45 76 | 65 6e 74 20 2a 72 65 70 | AppleEv|ent *rep|
|00004560| 6c 79 2c 20 6c 6f 6e 67 | 20 72 65 66 63 6f 6e 29 |ly, long| refcon)|
|00004570| 0d 7b 0d 09 46 53 53 70 | 65 63 09 09 6d 79 46 53 |.{..FSSp|ec..myFS|
|00004580| 53 3b 0d 09 41 45 44 65 | 73 63 4c 69 73 74 09 64 |S;..AEDe|scList.d|
|00004590| 6f 63 4c 69 73 74 3b 0d | 09 4f 53 45 72 72 09 09 |ocList;.|.OSErr..|
|000045a0| 65 72 72 3b 0d 09 6c 6f | 6e 67 09 09 69 6e 64 65 |err;..lo|ng..inde|
|000045b0| 78 2c 20 69 74 65 6d 73 | 49 6e 4c 69 73 74 3b 0d |x, items|InList;.|
|000045c0| 09 53 69 7a 65 09 09 61 | 63 74 75 61 6c 53 69 7a |.Size..a|ctualSiz|
|000045d0| 65 3b 0d 09 41 45 4b 65 | 79 77 6f 72 64 09 6b 65 |e;..AEKe|yword.ke|
|000045e0| 79 77 64 3b 0d 09 44 65 | 73 63 54 79 70 65 09 72 |ywd;..De|scType.r|
|000045f0| 65 74 75 72 6e 65 64 54 | 79 70 65 3b 0d 09 57 69 |eturnedT|ype;..Wi|
|00004600| 6e 64 6f 77 50 74 72 09 | 77 69 6e 64 3b 0d 0d 09 |ndowPtr.|wind;...|
|00004610| 2f 2f 20 67 65 74 20 74 | 68 65 20 64 69 72 65 63 |// get t|he direc|
|00004620| 74 20 70 61 72 61 6d 65 | 74 65 72 2d 2d 61 20 64 |t parame|ter--a d|
|00004630| 65 73 63 72 69 70 74 6f | 72 20 6c 69 73 74 2d 2d |escripto|r list--|
|00004640| 61 6e 64 20 70 75 74 0d | 09 2f 2f 20 69 74 20 69 |and put.|.// it i|
|00004650| 6e 74 6f 20 64 6f 63 4c | 69 73 74 0d 09 65 72 72 |nto docL|ist..err|
|00004660| 20 3d 20 41 45 47 65 74 | 50 61 72 61 6d 44 65 73 | = AEGet|ParamDes|
|00004670| 63 28 74 68 65 41 45 76 | 65 6e 74 2c 20 6b 65 79 |c(theAEv|ent, key|
|00004680| 44 69 72 65 63 74 4f 62 | 6a 65 63 74 2c 0d 09 09 |DirectOb|ject,...|
|00004690| 09 09 09 09 09 74 79 70 | 65 41 45 4c 69 73 74 2c |.....typ|eAEList,|
|000046a0| 20 26 64 6f 63 4c 69 73 | 74 29 3b 0d 09 69 66 20 | &docLis|t);..if |
|000046b0| 28 65 72 72 29 0d 09 09 | 72 65 74 75 72 6e 20 65 |(err)...|return e|
|000046c0| 72 72 3b 0d 0d 09 2f 2f | 20 63 68 65 63 6b 20 66 |rr;...//| check f|
|000046d0| 6f 72 20 6d 69 73 73 69 | 6e 67 20 72 65 71 75 69 |or missi|ng requi|
|000046e0| 72 65 64 20 70 61 72 61 | 6d 65 74 65 72 73 0d 09 |red para|meters..|
|000046f0| 65 72 72 20 3d 20 4d 79 | 47 6f 74 52 65 71 75 69 |err = My|GotRequi|
|00004700| 72 65 64 50 61 72 61 6d | 73 28 74 68 65 41 45 76 |redParam|s(theAEv|
|00004710| 65 6e 74 29 3b 0d 09 69 | 66 20 28 65 72 72 29 20 |ent);..i|f (err) |
|00004720| 7b 0d 09 09 2f 2f 20 61 | 6e 20 65 72 72 6f 72 20 |{...// a|n error |
|00004730| 6f 63 63 75 72 72 65 64 | 3a 20 20 64 6f 20 74 68 |occurred|:  do th|
|00004740| 65 20 6e 65 63 65 73 73 | 61 72 79 20 65 72 72 6f |e necess|ary erro|
|00004750| 72 20 68 61 6e 64 6c 69 | 6e 67 0d 09 09 65 72 72 |r handli|ng...err|
|00004760| 20 3d 20 41 45 44 69 73 | 70 6f 73 65 44 65 73 63 | = AEDis|poseDesc|
|00004770| 28 26 64 6f 63 4c 69 73 | 74 29 3b 0d 09 09 72 65 |(&docLis|t);...re|
|00004780| 74 75 72 6e 09 65 72 72 | 3b 0d 09 7d 0d 0d 09 2f |turn.err|;..}.../|
|00004790| 2f 20 63 6f 75 6e 74 20 | 74 68 65 20 6e 75 6d 62 |/ count |the numb|
|000047a0| 65 72 20 6f 66 20 64 65 | 73 63 72 69 70 74 6f 72 |er of de|scriptor|
|000047b0| 20 72 65 63 6f 72 64 73 | 20 69 6e 20 74 68 65 20 | records| in the |
|000047c0| 6c 69 73 74 0d 09 65 72 | 72 20 3d 20 41 45 43 6f |list..er|r = AECo|
|000047d0| 75 6e 74 49 74 65 6d 73 | 20 28 26 64 6f 63 4c 69 |untItems| (&docLi|
|000047e0| 73 74 2c 20 26 69 74 65 | 6d 73 49 6e 4c 69 73 74 |st, &ite|msInList|
|000047f0| 29 3b 0d 0d 09 2f 2f 20 | 6e 6f 77 20 67 65 74 20 |);...// |now get |
|00004800| 65 61 63 68 20 64 65 73 | 63 72 69 70 74 6f 72 20 |each des|criptor |
|00004810| 72 65 63 6f 72 64 20 66 | 72 6f 6d 20 74 68 65 20 |record f|rom the |
|00004820| 6c 69 73 74 2c 20 63 6f | 65 72 63 65 0d 09 2f 2f |list, co|erce..//|
|00004830| 20 74 68 65 20 72 65 74 | 75 72 6e 65 64 20 64 61 | the ret|urned da|
|00004840| 74 61 20 74 6f 20 61 6e | 20 46 53 53 70 65 63 20 |ta to an| FSSpec |
|00004850| 72 65 63 6f 72 64 2c 20 | 61 6e 64 20 6f 70 65 6e |record, |and open|
|00004860| 20 74 68 65 0d 09 2f 2f | 20 61 73 73 6f 63 69 61 | the..//| associa|
|00004870| 74 65 64 20 66 69 6c 65 | 0d 09 66 6f 72 20 28 69 |ted file|..for (i|
|00004880| 6e 64 65 78 20 3d 20 31 | 3b 20 69 6e 64 65 78 20 |ndex = 1|; index |
|00004890| 3c 3d 20 69 74 65 6d 73 | 49 6e 4c 69 73 74 3b 20 |<= items|InList; |
|000048a0| 69 6e 64 65 78 2b 2b 29 | 0d 09 7b 0d 09 09 65 72 |index++)|..{...er|
|000048b0| 72 20 3d 20 41 45 47 65 | 74 4e 74 68 50 74 72 28 |r = AEGe|tNthPtr(|
|000048c0| 26 64 6f 63 4c 69 73 74 | 2c 20 69 6e 64 65 78 2c |&docList|, index,|
|000048d0| 20 74 79 70 65 46 53 53 | 2c 20 26 6b 65 79 77 64 | typeFSS|, &keywd|
|000048e0| 2c 0d 09 09 09 09 09 09 | 09 26 72 65 74 75 72 6e |,.......|.&return|
|000048f0| 65 64 54 79 70 65 2c 20 | 28 50 74 72 29 26 6d 79 |edType, |(Ptr)&my|
|00004900| 46 53 53 2c 0d 09 09 09 | 09 09 09 09 73 69 7a 65 |FSS,....|....size|
|00004910| 6f 66 28 6d 79 46 53 53 | 29 2c 20 26 61 63 74 75 |of(myFSS|), &actu|
|00004920| 61 6c 53 69 7a 65 29 3b | 0d 09 09 69 66 20 28 65 |alSize);|...if (e|
|00004930| 72 72 29 0d 09 09 09 53 | 79 73 42 65 65 70 28 31 |rr)....S|ysBeep(1|
|00004940| 30 29 3b 0d 09 09 0d 09 | 09 2f 2f 20 4f 70 65 6e |0);.....|.// Open|
|00004950| 20 74 68 65 20 66 69 6c | 65 2c 20 6d 61 6b 69 6e | the fil|e, makin|
|00004960| 67 20 61 20 6e 65 77 20 | 77 69 6e 64 6f 77 0d 09 |g a new |window..|
|00004970| 09 65 72 72 20 3d 20 4f | 70 65 6e 4a 75 67 67 6c |.err = O|penJuggl|
|00004980| 65 46 69 6c 65 28 26 6d | 79 46 53 53 2c 20 26 77 |eFile(&m|yFSS, &w|
|00004990| 69 6e 64 29 3b 0d 09 09 | 69 66 28 65 72 72 20 3d |ind);...|if(err =|
|000049a0| 3d 20 6e 6f 45 72 72 29 | 0d 09 09 7b 0d 09 09 09 |= noErr)|...{....|
|000049b0| 65 72 72 20 3d 20 41 70 | 70 50 72 69 6e 74 4f 6e |err = Ap|pPrintOn|
|000049c0| 65 28 77 69 6e 64 29 3b | 0d 09 09 09 44 6f 43 6c |e(wind);|....DoCl|
|000049d0| 6f 73 65 28 77 69 6e 64 | 29 3b 0d 09 09 7d 0d 09 |ose(wind|);...}..|
|000049e0| 09 0d 09 09 69 66 20 28 | 65 72 72 29 0d 09 09 09 |....if (|err)....|
|000049f0| 53 79 73 42 65 65 70 28 | 31 30 29 3b 0d 09 7d 0d |SysBeep(|10);..}.|
|00004a00| 0d 09 65 72 72 20 3d 20 | 41 45 44 69 73 70 6f 73 |..err = |AEDispos|
|00004a10| 65 44 65 73 63 28 26 64 | 6f 63 4c 69 73 74 29 3b |eDesc(&d|ocList);|
|00004a20| 0d 09 72 65 74 75 72 6e | 09 6e 6f 45 72 72 3b 0d |..return|.noErr;.|
|00004a30| 7d 0d 0d 70 61 73 63 61 | 6c 20 4f 53 45 72 72 20 |}..pasca|l OSErr |
|00004a40| 51 55 49 54 48 61 6e 64 | 6c 65 72 28 41 70 70 6c |QUITHand|ler(Appl|
|00004a50| 65 45 76 65 6e 74 20 2a | 74 68 65 41 45 76 65 6e |eEvent *|theAEven|
|00004a60| 74 2c 20 41 70 70 6c 65 | 45 76 65 6e 74 20 2a 72 |t, Apple|Event *r|
|00004a70| 65 70 6c 79 2c 20 6c 6f | 6e 67 20 72 65 66 63 6f |eply, lo|ng refco|
|00004a80| 6e 29 0d 7b 0d 09 4f 53 | 45 72 72 09 65 72 72 3b |n).{..OS|Err.err;|
|00004a90| 0d 0d 09 2f 2f 20 63 68 | 65 63 6b 20 66 6f 72 20 |...// ch|eck for |
|00004aa0| 6d 69 73 73 69 6e 67 20 | 72 65 71 75 69 72 65 64 |missing |required|
|00004ab0| 20 70 61 72 61 6d 65 74 | 65 72 73 0d 09 65 72 72 | paramet|ers..err|
|00004ac0| 20 3d 20 4d 79 47 6f 74 | 52 65 71 75 69 72 65 64 | = MyGot|Required|
|00004ad0| 50 61 72 61 6d 73 28 74 | 68 65 41 45 76 65 6e 74 |Params(t|heAEvent|
|00004ae0| 29 3b 0d 09 69 66 20 28 | 65 72 72 29 20 7b 0d 09 |);..if (|err) {..|
|00004af0| 09 2f 2f 20 61 6e 20 65 | 72 72 6f 72 20 6f 63 63 |.// an e|rror occ|
|00004b00| 75 72 72 65 64 3a 20 20 | 64 6f 20 74 68 65 20 6e |urred:  |do the n|
|00004b10| 65 63 65 73 73 61 72 79 | 20 65 72 72 6f 72 20 68 |ecessary| error h|
|00004b20| 61 6e 64 6c 69 6e 67 0d | 09 09 72 65 74 75 72 6e |andling.|..return|
|00004b30| 09 65 72 72 3b 0d 09 7d | 0d 09 0d 09 2f 2f 20 53 |.err;..}|....// S|
|00004b40| 65 74 20 74 68 65 20 67 | 6c 6f 62 61 6c 20 66 6c |et the g|lobal fl|
|00004b50| 61 67 20 69 66 20 74 68 | 65 20 75 73 65 72 20 64 |ag if th|e user d|
|00004b60| 6f 65 73 6e 27 74 20 63 | 61 6e 63 65 6c 0d 09 67 |oesn't c|ancel..g|
|00004b70| 44 6f 6e 65 46 6c 61 67 | 20 3d 20 43 6c 6f 73 65 |DoneFlag| = Close|
|00004b80| 41 6c 6c 44 6f 63 73 28 | 29 3b 0d 09 69 66 28 67 |AllDocs(|);..if(g|
|00004b90| 44 6f 6e 65 46 6c 61 67 | 20 3d 3d 20 66 61 6c 73 |DoneFlag| == fals|
|00004ba0| 65 29 0d 09 09 72 65 74 | 75 72 6e 09 75 73 65 72 |e)...ret|urn.user|
|00004bb0| 43 61 6e 63 65 6c 65 64 | 45 72 72 3b 0d 09 65 6c |Canceled|Err;..el|
|00004bc0| 73 65 0d 09 09 72 65 74 | 75 72 6e 09 6e 6f 45 72 |se...ret|urn.noEr|
|00004bd0| 72 3b 0d 7d 0d 0d 4f 53 | 45 72 72 09 4d 79 47 6f |r;.}..OS|Err.MyGo|
|00004be0| 74 52 65 71 75 69 72 65 | 64 50 61 72 61 6d 73 20 |tRequire|dParams |
|00004bf0| 28 41 70 70 6c 65 45 76 | 65 6e 74 20 2a 74 68 65 |(AppleEv|ent *the|
|00004c00| 41 45 76 65 6e 74 29 0d | 7b 0d 09 44 65 73 63 54 |AEvent).|{..DescT|
|00004c10| 79 70 65 09 72 65 74 75 | 72 6e 65 64 54 79 70 65 |ype.retu|rnedType|
|00004c20| 3b 0d 09 53 69 7a 65 09 | 09 61 63 74 75 61 6c 53 |;..Size.|.actualS|
|00004c30| 69 7a 65 3b 0d 09 4f 53 | 45 72 72 09 09 65 72 72 |ize;..OS|Err..err|
|00004c40| 3b 0d 0d 09 65 72 72 20 | 3d 20 41 45 47 65 74 41 |;...err |= AEGetA|
|00004c50| 74 74 72 69 62 75 74 65 | 50 74 72 28 74 68 65 41 |ttribute|Ptr(theA|
|00004c60| 45 76 65 6e 74 2c 20 6b | 65 79 4d 69 73 73 65 64 |Event, k|eyMissed|
|00004c70| 4b 65 79 77 6f 72 64 41 | 74 74 72 2c 0d 09 09 09 |KeywordA|ttr,....|
|00004c80| 09 09 74 79 70 65 57 69 | 6c 64 43 61 72 64 2c 20 |..typeWi|ldCard, |
|00004c90| 26 72 65 74 75 72 6e 65 | 64 54 79 70 65 2c 0d 09 |&returne|dType,..|
|00004ca0| 09 09 09 09 6e 69 6c 2c | 20 30 2c 20 26 61 63 74 |....nil,| 0, &act|
|00004cb0| 75 61 6c 53 69 7a 65 29 | 3b 0d 0d 09 69 66 20 28 |ualSize)|;...if (|
|00004cc0| 65 72 72 20 3d 3d 20 65 | 72 72 41 45 44 65 73 63 |err == e|rrAEDesc|
|00004cd0| 4e 6f 74 46 6f 75 6e 64 | 29 09 2f 2f 20 79 6f 75 |NotFound|).// you|
|00004ce0| 20 67 6f 74 20 27 65 6d | 20 61 6c 6c 0d 09 09 72 | got 'em| all...r|
|00004cf0| 65 74 75 72 6e 09 6e 6f | 45 72 72 3b 0d 09 65 6c |eturn.no|Err;..el|
|00004d00| 73 65 0d 09 09 69 66 20 | 28 65 72 72 20 3d 3d 20 |se...if |(err == |
|00004d10| 6e 6f 45 72 72 29 20 20 | 2f 2f 20 79 6f 75 20 6d |noErr)  |// you m|
|00004d20| 69 73 73 65 64 20 61 20 | 72 65 71 75 69 72 65 64 |issed a |required|
|00004d30| 20 70 61 72 61 6d 65 74 | 65 72 0d 09 09 09 72 65 | paramet|er....re|
|00004d40| 74 75 72 6e 09 65 72 72 | 41 45 50 61 72 61 6d 4d |turn.err|AEParamM|
|00004d50| 69 73 73 65 64 3b 0d 09 | 09 65 6c 73 65 09 2f 2f |issed;..|.else.//|
|00004d60| 20 74 68 65 20 63 61 6c | 6c 20 74 6f 20 41 45 47 | the cal|l to AEG|
|00004d70| 65 74 41 74 74 72 69 62 | 75 74 65 50 74 72 20 66 |etAttrib|utePtr f|
|00004d80| 61 69 6c 65 64 0d 09 09 | 09 72 65 74 75 72 6e 09 |ailed...|.return.|
|00004d90| 65 72 72 3b 0d 7d 0d 0d | 0d 2f 2a 2d 2d 2d 2d 2d |err;.}..|./*-----|
|00004da0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004db0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 76 6f 69 |--------|----.voi|
|00004dc0| 64 20 42 61 69 6c 4f 75 | 74 28 29 09 09 43 6c 65 |d BailOu|t()..Cle|
|00004dd0| 61 6e 20 75 70 20 61 6e | 64 20 73 70 6c 69 74 2e |an up an|d split.|
|00004de0| 2e 2e 0d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...-----|--------|
|00004df0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004e00| 2d 2d 2d 2d 2d 2d 20 2a | 2f 0d 0d 76 6f 69 64 20 |------ *|/..void |
|00004e10| 42 61 69 6c 4f 75 74 28 | 76 6f 69 64 29 0d 7b 0d |BailOut(|void).{.|
|00004e20| 09 41 70 70 43 6c 65 61 | 6e 55 70 28 29 3b 0d 20 |.AppClea|nUp();. |
|00004e30| 20 20 20 45 78 69 74 54 | 6f 53 68 65 6c 6c 28 29 |   ExitT|oShell()|
|00004e40| 3b 0d 7d 0d 0d 00 00 00 | 00 00 00 00 00 00 00 00 |;.}.....|........|
|00004e50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004e70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004e80| 00 00 01 00 00 00 02 18 | 00 00 01 18 00 00 00 52 |........|.......R|
|00004e90| 3b 0d 09 09 09 09 0d 09 | 09 09 09 48 4c 6f 63 6b |;.......|...HLock|
|00004ea0| 28 28 48 61 6e 64 6c 65 | 29 70 61 72 61 6d 73 2d |((Handle|)params-|
|00004eb0| 0d 53 68 65 6c 6c 45 76 | 65 6e 74 73 2e 63 02 00 |.ShellEv|ents.c..|
|00004ec0| 00 00 54 45 58 54 4d 4d | 43 43 01 00 ff ff ff ff |..TEXTMM|CC......|
|00004ed0| 00 00 54 45 58 54 4d 4d | 43 43 01 00 ff ff ff ff |..TEXTMM|CC......|
|00004ee0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004ef0| 00 00 9e 30 a0 a5 00 00 | 4d c5 00 00 02 6a 74 68 |...0....|M....jth|
|00004f00| 20 3d 20 34 3b 0d 09 09 | 09 09 73 70 65 63 73 2d | = 4;...|..specs-|
|00004f10| 3e 68 65 69 67 68 74 20 | 3d 20 34 3b 0d 09 09 09 |>height |= 4;....|
|00004f20| 09 73 70 65 63 73 2d 3e | 66 69 6c 6c 65 64 20 3d |.specs->|filled =|
|00004f30| 20 66 61 6c 73 65 3b 0d | 09 09 09 09 73 70 65 63 | false;.|....spec|
|00004f40| 73 2d 3e 69 73 4f 76 61 | 6c 20 3d 20 74 72 75 65 |s->isOva|l = true|
|00004f50| 3b 0d 09 09 09 09 48 55 | 6e 6c 6f 63 6b 28 28 48 |;.....HU|nlock((H|
|00004f60| 61 6e 64 6c 65 29 70 61 | 72 61 6d 73 2d 3e 73 74 |andle)pa|rams->st|
|00004f70| 6f 72 61 67 65 29 3b 0d | 09 09 09 09 72 73 6c 74 |orage);.|....rslt|
|00004f80| 00 00 00 c0 00 09 00 00 | 01 6b 00 00 01 72 0d 00 |........|.k...r..|
|00004f90| 00 00 31 20 44 6f 45 76 | 65 6e 74 00 00 00 05 11 |..1 DoEv|ent.....|
|00004fa0| 00 00 05 18 0d 00 00 00 | 32 20 44 6f 4d 6f 75 73 |........|2 DoMous|
|00004fb0| 65 00 00 00 0a 36 00 00 | 0a 3b 0b 00 00 00 33 20 |e....6..|.;....3 |
|00004fc0| 44 6f 4b 65 79 00 00 00 | 0b ee 00 00 0b ee 0b 00 |DoKey...|........|
|00004fd0| 00 00 34 20 44 6f 41 70 | 70 34 00 00 0e b5 00 00 |..4 DoAp|p4......|
|00004fe0| 0e bc 0d 00 00 00 35 20 | 44 6f 4d 65 6e 75 73 00 |......5 |DoMenus.|
|00004ff0| 00 00 10 d0 00 00 10 d7 | 0d 00 00 00 36 20 44 6f |........|....6 Do|
|00005000| 41 70 70 6c 65 00 00 00 | 12 5b 00 00 12 61 0b 00 |Apple...|.[...a..|
|00005010| 00 00 37 20 44 6f 46 69 | 6c 65 00 00 15 2a 00 00 |..7 DoFi|le...*..|
|00005020| 15 30 0b 00 00 00 38 20 | 44 6f 45 64 69 74 00 00 |.0....8 |DoEdit..|
|00005030| 17 b3 00 00 17 ba 0d 00 | 00 00 39 20 42 61 69 6c |........|..9 Bail|
|00005040| 4f 75 74 00 00 00 00 48 | 00 09 4d 6f 6e 61 63 6f |Out....H|..Monaco|
|00005050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005060| 00 00 00 00 00 00 00 00 | 00 00 00 03 00 04 00 3e |........|.......>|
|00005070| 00 04 01 cd 02 63 00 3e | 00 04 01 cd 02 63 ab ba |.....c.>|.....c..|
|00005080| ad 63 00 00 4d a1 00 00 | 4d ab 00 00 4b 43 01 00 |.c..M...|M...KC..|
|00005090| 00 00 00 04 00 01 00 01 | 00 00 01 00 00 00 02 18 |........|........|
|000050a0| 00 00 01 18 00 00 00 52 | 00 d8 7e 28 15 4e 00 00 |.......R|..~(.N..|
|000050b0| 00 1c 00 52 00 01 4d 50 | 53 52 00 01 00 12 4d 57 |...R..MP|SR....MW|
|000050c0| 42 42 00 00 00 2a 03 ef | ff ff 00 00 00 00 00 00 |BB...*..|........|
|000050d0| 00 00 03 ed ff ff 00 00 | 00 c4 00 00 00 00 03 f0 |........|........|
|000050e0| ff ff 00 00 01 10 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000050f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+